nach langer Zeit mal wieder hier, weil ich echt ein Brett vorm Kopf habe.
Ich möchte:
1. einen Bereich kopieren
2. Notepad öffnen und das kopierte dort einfügen
3. Notepaddatei als csv speichern und wieder schließen.
Mehr nicht!!! aber ich bekomme es nicht hin. Wer kann mir auf die Sprünge helfen?
hier der Code den ich schon habe:
Sub NotePad()
Dim x As Variant
Range("I1:I79").Copy
x = Shell("C:\Winxp\Notepad.exe ", vbNormalFocus)
'...kopierte Daten einfügen
'...Notepaddatei mit der Endung csv speichern und schließen
'...zu Excel zurück
End Sub
Vielen Dank schonmal fürs lesen bis hierhin
Gruß
Thorsten