Tablo satırlarını HTML sayfalarına dönüştürmek için komut dosyası nasıl oluşturulur?

Küçük bir açıklamayla birlikte yerel işletmelerin adresini içeren bir excel tablosum var. Bu dizini Wordpress siteme yüklemem gerekiyor.Tablo satırlarını HTML sayfalarına dönüştürmek için komut dosyası nasıl oluşturulur?

Tablodaki her satırın ayrı bir HTML web sayfası olmasını istiyorum. İçeriği şekillendirmek için bir css şablonum var, ancak tablo 1000'den fazla girdiye sahip. Bu nedenle, el ile yapmak bir acı olur.

ps. Eğer bir kelime basın eklentisi varsa, bunun en uygun olacağını kullanabilirdim

kaynak

2016-03-25 user2990613

Aşağıdaki kod CSS'de C1, C2, ..., Cx, vb.

Dim sDir As String 
Dim iRnd, iCnd, iRow, iCol As Integer 
Dim oFso As Object 
Dim oFil As Object 

sDir = ActiveWorkbook.Path & "\" 
iRnd = ActiveCell.SpecialCells(xlCellTypeLastCell).Row 
iCnd = ActiveCell.SpecialCells(xlCellTypeLastCell).Column 
Set oFso = CreateObject("Scripting.FileSystemObject") 

For iRow = 1 To iRnd 

    Set oFil = oFso.CreateTextFile(sDir & iRow & ".html") 
    oFil.WriteLine "<html><body>" 
    For iCol = 1 To iCnd 
     oFil.WriteLine "<div class='C" & iCol & "'>" & Cells(iRow, iCol) & "</div>" 
    Next 
    oFil.WriteLine "</body></html>" 
    oFil.Close 

Next 

Set oFil = Nothing 
Set oFso = Nothing 

MsgBox "Done"

kaynak

2016-03-25 01:58:35 LPYL

Kulağa hoş geldin diye kusura bakmayın ama bu hangi dilde? Bilmiyorum. – user2990613

Bu kod, Excel içinden kullanılabilen Visual Basic for Applications uygulamasındadır. – LPYL

Tamam, kulağa hoş geliyor, çok teşekkürler! – user2990613

Tablo satırlarını HTML sayfalarına dönüştürmek için komut dosyası nasıl oluşturulur?

cevap

İlgili konular