Das Archiv des Excel-Forums

Paste Spezial

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Paste Spezial
von: junny

Geschrieben am: 01.10.2003 10:48:09

Hallo Leute,
hab folgendes Makro aufgezeichnet (Tabelle wird geöffnet, kopiert, geschlossen und im aktiven Blatt eingefügt)

Problem: Ich krieg paste spezial nicht unter, denn ich will nur ausgefüllte Zellen einlesen, habe teilweise Formeln im aktiven Blatt die nicht überschrieben werden dürfen.





Sub Power()
Dim Zeile As Integer
Dim Spalte As Integer
Zeile = 1
Spalte = 1
Workbooks.Open Filename:= _
"C:\Dokumente und Einstellungen\vw\Eigene Dateien\Frau Berndt.xls"
Cells.Select
Selection.Copy
Application.DisplayAlerts = False
ActiveWindow.Close
Zeile = InputBox("Nr. Einfügezeile angeben:")
'If Box = "" Then Exit Sub
Cells(Zeile, Spalte).Select
ActiveSheet.PasteSpecial Format:="Unicode-Text", Link:=False, _
DisplayAsIcon:=False
Range("A5").Select
Application.DisplayAlerts = True
End Sub



Bin Dankbar für jeden Rat.

Noch was, wie kann ich die letzte aktive Zelle wieder anspringen?

Danke schonmal, gruss junny
Bild


Betrifft: Tastenkombination
von: willie
Geschrieben am: 01.10.2003 11:04:40

Letzte Zeile anspringen kannst du mit der Tastenkombination
STRG + Ende
Gruß
Willie

P.S. Du bist ja jetzt auch öfter im Forum!


Bild


Betrifft: AW: Paste Spezial
von: Willie
Geschrieben am: 01.10.2003 11:16:01

versuch es mal so! Gruß Willie

Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False


Bild


Betrifft: AW: Paste Spezial
von: junny
Geschrieben am: 01.10.2003 11:32:09

Hai Willie,
wenn ich von Dir Antwort bekomme bin ich guter Dinge, dennoch:

Wenn ich den Code Austausche bekomme ich einen Laufzeitfehler (1004). Diesen Code habe ich sonst allerdings auch schon aufgenommen (Inhalte einfugen/nur Werte/ ...) da hat er gepasst, jedoch hier gibt es den Fehler

Naja vielleicht fällt Dir noch was ein. Ist es evtl. die Reihenfolge?

Ja ich bin öfters im Forum, kann man viel dazulernen, entweder durch mitverfolgen oder auch mal selber Antworten.

Gruss junny


Bild


Betrifft: AW: Paste Spezial
von: junny
Geschrieben am: 02.10.2003 15:32:56

Willie, habe ich was falsch gemacht? (da Du nicht mehr geantworet hast)

Habe meinen Code umgebastelt, Mappe öffnet sich , Bereich wird markiert, copy, in der anderen Mappe eingefügt, dann wieder zur copy Mappe, diese schließen.


Viel Grüsse junny


Bild


Betrifft: AW: Paste Spezial
von: Willie
Geschrieben am: 02.10.2003 15:41:14

Nein hast nichts falsch gemacht... Ich kann mir das eben nicht
erklären, warum es nicht geht. Und weiter weis ich leider nicht!
Gruß
Willie


Bild


Betrifft: Alla Gut, schönen Feiertag
von: junny
Geschrieben am: 02.10.2003 16:02:27

o.T.


 Bild