Вход на сайт
Bопрос по VBA
146
10.06.05 08:31
Я програмиерую на VBA в Excel. Делаю одну Schleife и хочу, чтобы моя программа выдавала ответы в Excel-Tabelle, но не в столбик, а в строчку. Не знаю, как ето написать...
Если в столбик, то... например
Sheets("Daten").Range("H" & i + 1).Value =x
i=i+1
Столб H остается постоянным, а строчка меняется. Как написать, чтобы строчка оставалась постоянной, а столбцы менялись?
Может, кто знает? Подскажите
Если в столбик, то... например
Sheets("Daten").Range("H" & i + 1).Value =x
i=i+1
Столб H остается постоянным, а строчка меняется. Как написать, чтобы строчка оставалась постоянной, а столбцы менялись?
Может, кто знает? Подскажите
NEW 10.06.05 10:31
Проще всего используя Cells( row, column )
For clmn_index = 1 to N
Sheets( "Daten" ).Cells( row_index, clmn_index ).Value = x
Next clmn_index
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbaxl11/html/xl...
NEW 11.06.05 09:51
Sub Steptest()
For n = 1 To 32 Step 4
Sheets("Tabelle1").Cells(1, n).Value = "text"
Next n
End Sub
'//////////////////////////////////////////////////
Sub Steptest1()
For n = 1 To 32 Step 4
Sheets("Tabelle1").Range("H" & n).Value = "text"
Next n
End Sub
* Прописан в аду *
в ответ zweti2005 10.06.05 14:15
Sub Steptest()
For n = 1 To 32 Step 4
Sheets("Tabelle1").Cells(1, n).Value = "text"
Next n
End Sub
'//////////////////////////////////////////////////
Sub Steptest1()
For n = 1 To 32 Step 4
Sheets("Tabelle1").Range("H" & n).Value = "text"
Next n
End Sub
* Прописан в аду *