Range oder Cells ?
ing.grohn
ich ersetze in einer Tabelle in einer bestimmten Zeile die Formeln durch Werte (Zeile Kopieren, Inhalte einfügen, nur Werte):
If Antwort = vbNo Then
'With Tab2.Range(Cells(KW + 16, 3), Cells(KW + 16, 26))
With Tab2.Range("C" & (KW + 16) & ":Z" & (KW + 16))
.Copy
.PasteSpecial Paste:=xlPasteValues, _
Operation:=xlNone, _
SkipBlanks:=False, _
Transpose:=False
End With
MsgBox "hierwar ich"
End If
die Sequenz wird korrekt durchlaufen (Hierwar ich), auch die Zeile stimmt.
Mit "With Tab2.Range(Cells(KW + 16, 3), Cells(KW + 16, 26))" funktioniert das nicht.
Mit "With Tab2.Range("C" & (KW + 16) & ":Z" & (KW + 16))" gehts!
(das Ganze läuft in einer Schleife über mehrere Tabellenblätter (alles andere funktioniert auch so, wie gedacht, nur diese Sequenz nicht))
Warum funktioniert die Cells-Formulierung nicht, was mache ich da falsch?
Mit vielem Dank erbitte ich eine Antwort
Mit freundlichen Grüßen
ALbrecht