Macro : Making label for each 3 column then border completely

muhammad susanto

muhammad susanto

Well-known Member
Joined
Jan 8, 2013
Messages
2,077
Office Version
  1. 365
  2. 2021
Platform
  1. Windows
hi all..

I need excel macro to figure out this below sample :

[TABLE="width: 1, align: center"]
<tbody>[TR]
[TH="bgcolor: #FFFFFF"]seq number[/TH]
[TH="bgcolor: #FFFFFF, align: center"]name[/TH]
[TH="bgcolor: #FFFFFF, align: center"]address[/TH]
[TH="bgcolor: #FFFFFF, align: center"]city[/TH]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]1[/TD]
[TD="bgcolor: #FFFF00"]A KARIM[/TD]
[TD="bgcolor: #FFFF00"]JL.HANG LEKIU NO 29 SUKAMULIA SAIL[/TD]
[TD="bgcolor: #FFFF00"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]2[/TD]
[TD="bgcolor: #00B0F0"]A.MUIS J.[/TD]
[TD="bgcolor: #00B0F0"]JL.SAOMATI RT 03/07, SAIL/TENAYAN RAYA[/TD]
[TD="bgcolor: #00B0F0"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]3[/TD]
[TD="bgcolor: #F4B084"]ABD. HARIS N[/TD]
[TD="bgcolor: #F4B084"]JL.BELANAK IV/452 LIMBUNGAN RUMBAI PESISIR[/TD]
[TD="bgcolor: #F4B084"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]4[/TD]
[TD="bgcolor: #FFFFFF"]ABDUL AZIZ[/TD]
[TD="bgcolor: #FFFFFF"]JL.SAOMATI/TENAYAN RAYA/PEKANBARU[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]5[/TD]
[TD="bgcolor: #FFFFFF"]ABDUL HALIM[/TD]
[TD="bgcolor: #FFFFFF"]JL. KIJANG NO 24 HARJOSARI/SUKAJADI[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]6[/TD]
[TD="bgcolor: #FFFFFF"]ABDUL HARIS[/TD]
[TD="bgcolor: #FFFFFF"]JL.HANG TUAH KP. KELAPA NO 38 SAIL[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]7[/TD]
[TD="bgcolor: #FFFFFF"]ABDUL JALIL[/TD]
[TD="bgcolor: #FFFFFF"]JL. KEMUNING GG MESJID NO 30A SENAPELAN[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]8[/TD]
[TD="bgcolor: #FFFFFF"]ABDUL MUTHALIB[/TD]
[TD="bgcolor: #FFFFFF"]JL.GRIYA TIKA UTAMA SAI MINTAN BLOK N. NO.15 BKT.RAYA[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]9[/TD]
[TD="bgcolor: #FFFFFF"]ABDULFIKRI[/TD]
[TD="bgcolor: #FFFFFF"]JL.JEND.SUDIRMAN. ATAS SIMP.TIGA/B. RAYA[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]10[/TD]
[TD="bgcolor: #FFFFFF"]ABU BAKAR[/TD]
[TD="bgcolor: #FFFFFF"]JL. PESISIR NO 127 MERANTI PANDAK RUMBAI PESISIR[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]11[/TD]
[TD="bgcolor: #FFFFFF"]ACHMAD ZAILANI[/TD]
[TD="bgcolor: #FFFFFF"]JL.MUSLIMIN TANAH DATAR/PKB KOTA[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]12[/TD]
[TD="bgcolor: #FFFFFF"]ACHYAR YUDO[/TD]
[TD="bgcolor: #FFFFFF"]JL.PINUS GG.SUNGKAI NO 1 TANGKERANG UTARA[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]13[/TD]
[TD="bgcolor: #FFFFFF"]ADE FIRMANSYAH[/TD]
[TD="bgcolor: #FFFFFF"]JL. LEMBAH MULIA NO.01 SUKAMAJU/SAIL[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]14[/TD]
[TD="bgcolor: #FFFFFF"]ADI KASDI[/TD]
[TD="bgcolor: #FFFFFF"]JL. DURIAN NO 93 PEKANBARU[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]15[/TD]
[TD="bgcolor: #548235"]ADNAN[/TD]
[TD="bgcolor: #548235"]JL.KARTIKA UJUNG UMBAN SARI RUMBAI[/TD]
[TD="bgcolor: #548235"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]16[/TD]
[TD="bgcolor: #FFD966"]ADRI.ST.SATI[/TD]
[TD="bgcolor: #FFD966"]JL.TASKURUN NO.34 WONOREJO/MARPOYAN DAMAI[/TD]
[TD="bgcolor: #FFD966"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]17[/TD]
[TD="bgcolor: #305496"]ADRIAN KURNIAWAN[/TD]
[TD="bgcolor: #305496"]JL. LANGSAT NO.11[/TD]
[TD="bgcolor: #305496"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]18[/TD]
[TD="bgcolor: #FFFFFF"]ADRIANI, DRA.[/TD]
[TD="bgcolor: #FFFFFF"]JL.RAWAWIRI NO.9 TKG.LABUAI[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]19[/TD]
[TD="bgcolor: #FFFFFF"]AFDA ARI[/TD]
[TD="bgcolor: #FFFFFF"]JL.KAPAS NO 4 BUKIT RAYA[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]20[/TD]
[TD="bgcolor: #FFFFFF"]AFLIHAN TELOS[/TD]
[TD="bgcolor: #FFFFFF"]JL. KEMBANG SARI NO 18 SAIL[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]21[/TD]
[TD="bgcolor: #FFFFFF"]AFNIATI[/TD]
[TD="bgcolor: #FFFFFF"]JL. HR SUBRANTAS RT.05/04 SIDOMULYO BARAT TAMPAN[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]22[/TD]
[TD="bgcolor: #FFFFFF"]AFRIELI[/TD]
[TD="bgcolor: #FFFFFF"]JL.HIJRAH Gg. BAKTI 15 A TANJUNG RHU LIMA PULUH[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]23[/TD]
[TD="bgcolor: #FFFFFF"]AGUS JALI[/TD]
[TD="bgcolor: #FFFFFF"]JL. ABDUL MUIS NO.32 CINTARAJA /SAIL[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]24[/TD]
[TD="bgcolor: #FFFFFF"]AGUSTAMI[/TD]
[TD="bgcolor: #FFFFFF"]JL SUKA KARYA GRAHA PANAM PERMAI F11 TUAH KARYA[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]25[/TD]
[TD="bgcolor: #FFFFFF"]AGUSTIN NUGRAHA[/TD]
[TD="bgcolor: #FFFFFF"]JL. MERAK SAKTI NO.11 SIMP. BARU/TAMPAN[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]26[/TD]
[TD="bgcolor: #FFFFFF"]AGUSWAR[/TD]
[TD="bgcolor: #FFFFFF"]JL.A.YANI GG TERENDAM III NO 124/PULAU KARAM[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]27[/TD]
[TD="bgcolor: #FFFFFF"]AGUSWIDARTI[/TD]
[TD="bgcolor: #FFFFFF"]JL.MERAK NO 15 KAMPUNG MELAYU/SUKAJADI[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]28[/TD]
[TD="bgcolor: #FFFFFF"]AHMAD GUNAWAN[/TD]
[TD="bgcolor: #FFFFFF"]JL.SUDIRMAN GG ASIA NO.11 TANAH DATAR[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]29[/TD]
[TD="bgcolor: #FFFFFF"]AHMAD THOHA[/TD]
[TD="bgcolor: #FFFFFF"]JL.GELUGUR UJUNG NO.56 TKG.UTARA[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
[TR]
[TD="bgcolor: #FFFFFF, align: center"]30[/TD]
[TD="bgcolor: #FFFFFF"]AIZAR[/TD]
[TD="bgcolor: #FFFFFF"]JL.PANDAN GG.CENDANA NO.8G, TKG.UTARA[/TD]
[TD="bgcolor: #FFFFFF"]PEKANBARU[/TD]
[/TR]
</tbody>[/TABLE]



<!-- Please do not remove this header -->
<!-- Table easily created from Excel with ASAP Utilities (http://www.asap-utilities.com) -->
<table width="1" border="1" bordercolor="#C0C0C0" bordercolordark="#FFFFFF" cellspacing="1" cellpadding="2" align="center" frame="border" rules="all">
<tr align="left" valign="top">
<th bgcolor="#FFFFFF" valign="middle" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">seq number</font></th>
<th colspan="2" bgcolor="#D6DCE4" align="center" valign="middle" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">expected result/after macro</font></th>
<th bgcolor="#FFFFFF" valign="middle" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">seq number</font></th>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">1</font></td>
<td bgcolor="#FFFF00" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">A KARIM</font></td>
<td bgcolor="#548235" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">ADNAN</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">15</font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFF00" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">JL.HANG LEKIU NO 29 SUKAMULIA SAIL</font></td>
<td bgcolor="#548235" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">JL.KARTIKA UJUNG UMBAN SARI RUMBAI</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFF00" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">PEKANBARU</font></td>
<td bgcolor="#548235" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">PEKANBARU</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">2</font></td>
<td bgcolor="#00B0F0" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">A.MUIS J.</font></td>
<td bgcolor="#FFD966" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">ADRI.ST.SATI</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">16</font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#00B0F0" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">JL.SAOMATI RT 03/07, SAIL/TENAYAN RAYA</font></td>
<td bgcolor="#FFD966" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">JL.TASKURUN NO.34 WONOREJO/MARPOYAN DAMAI</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#00B0F0" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">PEKANBARU</font></td>
<td bgcolor="#FFD966" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">PEKANBARU</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">3</font></td>
<td bgcolor="#F4B084" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">ABD. HARIS N</font></td>
<td bgcolor="#305496" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">ADRIAN KURNIAWAN</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">17</font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#F4B084" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">JL.BELANAK IV/452 LIMBUNGAN RUMBAI PESISIR</font></td>
<td bgcolor="#305496" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">JL. LANGSAT NO.11</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#F4B084" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">PEKANBARU</font></td>
<td bgcolor="#305496" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">PEKANBARU</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">4</font></td>
<td bgcolor="#FFFFFF" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">etc..</font></td>
<td bgcolor="#FFFFFF" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">etc…</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">18</font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">5</font></td>
<td bgcolor="#FFFFFF" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">etc..</font></td>
<td bgcolor="#FFFFFF" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">etc…</font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000">19</font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
<tr align="left" valign="top">
<td bgcolor="#FFFFFF" align="center" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
<td bgcolor="#FFFFFF" align="right" valign="bottom" style="white-space: nowrap"><font face="Verdana" size="2" color="#000000"></font></td>
</tr>
</table>
 
Last edited:

Excel Facts

How to change case of text in Excel?
Use =UPPER() for upper case, =LOWER() for lower case, and =PROPER() for proper case. PROPER won't capitalize second c in Mccartney
Sort by date Sort by votes
additional information :


note :
1) transpose data for each 3 column in 3 line/row;
2) max tranpose data is 14 rows, start transpose from seq.number 1 to 14 (for left column)
and start seq.number 15 to seq.number 28 (as in right column)
3) coloring shading just the clue to easy grouped;
4) after transpose, giving border line for each data
 
Upvote 0
it works but not fully exactly that's i want
like my sample,i need adding border line for each data :

Code: 
Sub test()Dim i As Long, j As Long, myrow As Long, mycol As Long
For i = 2 To Cells(Rows.Count, "B").End(xlUp).Row
  mycol = (i - 2) \ 14
  myrow = 4 * (i - 2) - 14 * 4 * mycol + 1
  For j = 1 To 3
    Cells(myrow + j, mycol + 6) = Cells(i, j + 1)
  Next j
Next i
End Sub

https://app.box.com/s/wuc100qkpfc25258xh37978tohgim76z

how do make it?
 
Upvote 0
You must log in or register to reply here.

Similar threads

C
  • Question Question
Picture won't paste in cell overlay
Replies
0
Views
242
Cerka
C
D
  • Solved
VBA Function to Paste Table into Outlook Email Resulting in HTML language in Email
Replies
8
Views
537
smozgur
smozgur
E
  • Question Question
VBA code clean up
Replies
9
Views
482
mumps
mumps
C
  • Solved
Excel 2016 32bit VBA Pulling info from Website to Sheet
Replies
2
Views
1K
CrashOD
C
E
  • Question Question
Adding a custom message.
Replies
1
Views
633
Micron
M

Forum statistics

Threads
1,223,243
Messages
6,170,971
Members
452,371
Latest member
Frana

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top