title image


Smiley ActiveSheet.Columns("h" + k).Select ???
Was hast Du denn für eine Excel-Version, dass Du die Spalten(!) H0, H1 , H2 und H3 ansprechen willst?



Wenn schon ,dann wohl so ...

ActiveSheet.Columns(8 + k).Select '8 = Spalte "H"



Derselbe Fehler passiert Dir auch hier ...

Selection.TextToColumns Destination:=Range("h" + k & "1"),



Dort sollte es z.B. wohl so heissen ...

Selection.TextToColumns Destination:=Cells(1, 8 + k),



Gruss
scotty

I´m an admin. If you see me laughing, you should better have a backup.
Einen Fehler machen und ihn nicht korrigieren - das erst heisst wirklich einen Fehler machen.
Konfuzius


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: