Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Paste in ausgeblendete Mappe
zurück: Makro läuft zweimal bei Start aus anderer Datei weiter: Arbeitsblatt für mehrere Nutzer / Zellen sperren Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Frank Chamanara
Gast


Verfasst am:
18. Feb 2013, 17:02
Rufname:

Paste in ausgeblendete Mappe - Paste in ausgeblendete Mappe

Nach oben
       Version: Office 2010

Hallo zusammen,

ich habe ein Excel-File in dem ich aus meherern anderen Dateien Daten zusammentragen will.
Mein Programm soll eine weitere Excel-Datei öffnen aus einer bestimmten Mappe einen bestimmten Bereich kopieren und die Formatierung und Verlinkung in das Excelfile einfügen.
Das funktioniert soweit auch alles, nun will ich aber die Mappe "PS_MO_DE", in die die Daten eingefügt werden, der Übersichlichkeit halber ausblenden. Das Format wird dann noch ohne Probleme übertragen, aber ich weiß nicht wie die Funktion .paste link=true umgeschrieben werden muss, sodass sie auch auf ausgeblendete Mappen anwendbar ist.

Vielleicht könnt ihr mir weiterhelfen.

PS: Dies ist mein erster Beitrag in einem Forum wie diesem, daher verzeiht bitte, falls der Beitrag nicht perfekt ist.


Code:
Dim dati As Variant
Dim WB As Workbook
Dim B As String
Dim A As String


Sub DatenimportDE()

A = ActiveWorkbook.Name

'Öffnen der Datei:
dati = Application.GetOpenFilename("Excel-Dateien(*.xl*),*.xl*")
If dati = False Then Exit Sub
Set WB = Workbooks.Open(Filename:=dati)
B = ActiveWorkbook.Name

'Kopieren der gewünschten Daten:
Sheets("Predecessor_Successor").Range("A1:L207").Copy
Workbooks(A).Activate

'Paste Formatierung:
With Sheets("PS_MO_DE").Range("A1")
.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End With

'Paste Link:
Sheets("PS_MO_DE").Activate
Range("A1").Select
ActiveSheet.Paste link:=True
Burkel
Excel-VBA Fortgeschritten


Verfasst am:
20. Feb 2013, 19:12
Rufname:


AW: Paste in ausgeblendete Mappe - AW: Paste in ausgeblendete Mappe

Nach oben
       Version: Office 2010

Hallo Frank

Nur ganz kurz, ohne deinen Code wirklich gelesen, oder verstanden zu haben (ich weiß, nicht ideal, aber mehr Zeit habe ich nicht).

Code:
'Paste Link:
Sheets("PS_MO_DE").Range("A1").Paste link:=True


Du brauchst aus VBA heraus eigentlich nie Select und Activate. Das ist, was du mit der Maus machen würdest. VBA kann ganz ohne Darstellung nach außen auf Zellen zugreifen.

Gib Bescheid, ob es klappt.

Grüße

Burkel
Gast



Verfasst am:
28. Feb 2013, 12:25
Rufname:

AW: Paste in ausgeblendete Mappe - AW: Paste in ausgeblendete Mappe

Nach oben
       Version: Office 2010

Hallo Burkel,

vielen Dank für deine Antwort.
Habe das Problem mitlerweile anderweitig gelöst.

Hab nochmal rumprobiert und es funktioniert scheinbar nur folgendermasen:
Code:
Application.ScreenUpdating = False
    With Workbooks(A).Sheets("SP_MO_HU")
    .Activate
    ActiveSheet.Paste link:=True
    End With


Trotzdem vielen Dank.

Viele Grüße

Frank
Gast



Verfasst am:
28. Feb 2013, 13:08
Rufname:


AW: Paste in ausgeblendete Mappe - AW: Paste in ausgeblendete Mappe

Nach oben
       Version: Office 2010

Hallo Frank

Mir ist jetzt noch unklarer als vorher, wo das Problem liegt (lag).
Offenbar geht Activate ja doch für ausgeblendete Tabellenblätter.
Aber so lange es funktioniert ist ja gut.

Danke für die Rückmeldung

Grüße

Burkel
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Bei WENN-Funktion den DANN-Wert aus anderer Mappe 8 Nepomuck 600 13. Jul 2011, 13:03
Gast Bei WENN-Funktion den DANN-Wert aus anderer Mappe
Keine neuen Beiträge Excel Formeln: Mappe mit automatischer Datenblatterstellung 5 MTerhechte 596 22. März 2011, 06:22
MTerhechte Mappe mit automatischer Datenblatterstellung
Keine neuen Beiträge Excel Formeln: Ausgeblendete Zeile in Berechnung mit einbeziehen 3 Gast 700 04. März 2011, 14:22
HermannZ Ausgeblendete Zeile in Berechnung mit einbeziehen
Keine neuen Beiträge Excel Formeln: Wenn-dann Formel anwenden und in zweite Mappe kopieren 28 SiMaRu 1521 28. Nov 2010, 04:22
a3e Wenn-dann Formel anwenden und in zweite Mappe kopieren
Keine neuen Beiträge Excel Formeln: Kopieren von Werte in eine ander Mappe 3 Günter24 188 18. Nov 2010, 09:35
{Boris} Kopieren von Werte in eine ander Mappe
Keine neuen Beiträge Excel Formeln: Automatisches ausfüllen von Zellen/Zeilen aus einer Mappe 13 Annemarie 603 25. Okt 2010, 11:28
Annemarie Automatisches ausfüllen von Zellen/Zeilen aus einer Mappe
Keine neuen Beiträge Excel Formeln: Ausgeblendete zellen nicht anwählen 3 bastianoo 382 07. Okt 2010, 11:20
Gast Ausgeblendete zellen nicht anwählen
Keine neuen Beiträge Excel Formeln: ABC-Analyse ausgeblendete Zellen ignorieren 2 Sven5468 702 27. Aug 2010, 09:56
Gast18 ABC-Analyse ausgeblendete Zellen ignorieren
Keine neuen Beiträge Excel Formeln: ausgeblendete Zellen horizontal!! nicht berücksichtigen 4 floyd_ac 1526 14. Apr 2010, 20:05
shift-del ausgeblendete Zellen horizontal!! nicht berücksichtigen
Keine neuen Beiträge Excel Formeln: Gültigkeitsregel wird bei copy und paste nicht angewendet. 3 becher24 806 20. Nov 2009, 10:33
becher24 Gültigkeitsregel wird bei copy und paste nicht angewendet.
Keine neuen Beiträge Excel Formeln: in einer mappe mehrere zusammenfügen? 1 egon22e 312 29. Jul 2009, 10:00
Gast in einer mappe mehrere zusammenfügen?
Keine neuen Beiträge Excel Formeln: Wert Copy Paste via VBA 2 Tester11111 903 15. Jan 2009, 15:14
Mac4 Wert Copy Paste via VBA
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML CSS