Zischenablage als Spalte nicht als Zeile?
18.11.2003 15:30:25
Micha
Wie kann ich aus der Zwischenablage einfügen ohne das Spalten nicht in eine Zelle gehen sondern auch in eine Spalte?
Hier der Code:
Set Zwischenablage = New DataObject
Zwischenablage.GetFromClipboard
On Error GoTo Errorhandler
Spreadsheet1.Cells(2, 1) = Zwischenablage.GetText
On Error GoTo Errorhandler
Set Zwischenablage = Nothing
Exit Sub
Errorhandler:
MsgBox "Zwischenablage ist leer! Bitte kopieren sie Ihre Daten durch Rechtklick der Maus > Kopieren!"
Exit Sub
Vielen Dank schon im Vorraus
Micha