ich markiere in der Tabelle1 Spalte A versichiedene Zellen. zb.A1,A3,A4,A6.
Gibt es eine möglichkeit das ich dann per Makro in die markierten Zellen den Text KB1 einfügen kann
Danke für eure Hilfe
Option Explicit
Sub Makierte_Zellen_füllen()
Dim rngtmp As Range
For Each rngtmp In Selection
rngtmp = "test" 'Dein Text
Next rngtmp
End Sub
Gruß
Sub text()
Selection = "KB1"
End Sub
gruss hary
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen