VBA Zeile füllen in Bereich
#1
Ich möchte in Tabelle 3 die Zeile 3 mit von Spalte 4 bis 
Code:
Sub IntervallzeilefüllenGZ()
With Worksheets("Tabelle3")
For Spalte = 6 To 34
        Cells(Spalte, 3) = Zeile - 6
        Next
End With
End Sub
Spalte 34 mit Spaltennummern füllen. Wie kann ich jetzt hier den Bereich einfügen, damit er weiss, was gemeint ist?
Antworten Top
#2
er machts nicht!
Antworten Top
#3
Hallo, 19 

die Syntax von "Cells" ist: 21
Code:
Cells(Zeile, Spalte) 
Antworten Top
#4
Code:
Sub M_snb()
    [D3:AH3] = "=column()"
End Sub
Zum übersetzen von Excel Formeln:

http://dolf.trieschnigg.nl/excel/index.p...gids=en+de
Antworten Top
#5
Code:
Sub IntervallzeilefüllenGZ()
With Worksheets("Tabelle3")
For Spalte = 6 To 34
        Cells(6, Spalte) = Zeile - 6
        Next
End With
End Sub
Hab es eingebaut, den Hinweis, hat nichts gebracht, ist wieder abgestürzt ... ich bin wohl von Python verdorben!
Antworten Top
#6
Schau mal #4
Zum übersetzen von Excel Formeln:

http://dolf.trieschnigg.nl/excel/index.p...gids=en+de
Antworten Top
#7
Hallo Kurt,
wenn Du schon mit With arbeitest, solltest du den Punkt vor Cells nicht vergessen: .Cells(3, Spallte) = Zeile - 6.
[Bild: attachment-190.gif]
Gruß Günter
aus der Helden-, Messe-, Musik-, Buch-, Universitäts- und Autostadt Leipzig
Antworten Top
#8
Hallo

mit der Syntac :  .Cells(3, Spalte) = Zeile - 6   klappt es nicht. Beide Codes klappen mit der richtigen Syntac einwandfrei.

mfg Gast 123

Code:
Sub IntervallzeilefüllenGZ()
With Worksheets("Tabelle3")
For Spalte = 6 To 34
    .Cells(3, Spalte) = Spalte - 6
Next
End With
End Sub



Sub M_snb()
    Worksheets("Tabelle3").[F3:AH3] = "=column()-6"
End Sub
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste