Das Clever-Excel-Forum.de - Treffen
... 14.-16. September 2018 im Allgäu ...

[Excel] Zellen einer Spalte neben einem mehrspaltigen Bereich ansprechen
#1
Option Explicit

Sub NextColumn()
'Adresse eines mehrspaltigen Bereich in rechts daneben liegende Spalte
'verschieben und auf eine Spalte zuruecksetzen
'Mit dem Bereich A2:B3
With Range(Cells(2, 1), Cells(3, 2))
'Offset um Anzahl der Spalten, zuruecksetzen auf eine Spalte
'und Daten bzw. Werte eintragen - hier 1
.Offset(0, .Columns.Count).Resize(.Rows.Count, 1).Value = 1
'Ende Mit dem Bereich A2:B3
End With
End Sub

Stichworte zur Suche in unserem Excel-Forum:
Excel VBA
benachbarte Zelle Zeile Spalte
Makro OFFSET RESIZE
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
to top


Gehe zu:


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