title image


Smiley Re: Wie sieht denn dein bisheriger Code zum Eintrag in Tab2 aus?
Hallo Worti!



Den Code fürs Markieren fand ich jetzt:



Hier wird der Bereich von A2 bis zur letzten Zeile Spalte I markiert.



Private Sub CommandButton24_Click()

Sheets("Tabelle3").Select

Dim lz As Long

lz = Cells(Rows.Count, 7).End(xlUp).Row

Range("A2:I" & lz).Select



Jetzt würde mir noch eine lösung fehlen wie ich die Markierung kopieren und an die nächste freie Stelle in der Spalte A einfügen kann. Die Markierung müßte jedoch erhalten bleiben.



Josef

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: