Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1548to1552
1548to1552
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

VBA: Select nach Copy Paste nicht möglich

Forumthread: VBA: Select nach Copy Paste nicht möglich

VBA: Select nach Copy Paste nicht möglich
05.04.2017 19:49:17
Markus
Hallo,
ich verwende folgenden Code, um Daten von einer Datei in eine andere zu kopieren (als Teil eines größeren Makros).
Der Code funktioniert soweit ohne Probleme, allerdings bleiben danach immer die Bereiche des Copy / Paste markiert (ausgewählt).
Das wollte ich umgehen, indem ich z.B. die Zelle A1 in VBA auswähle, dann bekomme ich jedoch immer einen 1004 Run-time error (Select Method of Worksheet Class Failed).
Kann mir jemand sagen, wie sich das umgehen lässt bzw. die Bereiche gar nicht sichtbar markiert werden ?
Mein Code: 
    With varTargetSheet
.Cells.ClearContents
varSourceSheet.Cells.Copy
.Range("A1").PasteSpecial Paste:=xlPasteValues
.Rows("1:1").Replace What:=" (*", Replacement:="", MatchCase:=False
End With
Vielen Dank im Voraus für Eure Hilfe,
Markus
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Select nach Copy Paste nicht möglich
05.04.2017 19:51:22
Hajo_Zi
Hallo Markus,
Du kannst nur in einer aktiven Tabelle select machen.

AW: VBA: Select nach Copy Paste nicht möglich
05.04.2017 19:54:44
Markus
Danke, Hajo !
varTargetFile.Activate hat geholfen. :)
VG,
Markus
AW: VBA: Select nach Copy Paste nicht möglich
05.04.2017 22:18:58
Rolf
Hallo Markus,
das geht auch mit
Application.CutCopyMode=False
Gruß Rolf
Anzeige
nee, damit ...
06.04.2017 00:20:48
Uduuh
Hallo,
...beseitigst du nur die "Ameisen". Der Bereich bleibt trotzdem selektiert.
Lösung ohne die Tabelle zu aktivieren: 
    With varTargetSheet
.Cells.ClearContents
varSourceSheet.Cells.Copy
.Range("A1").PasteSpecial Paste:=xlPasteValues
.Rows("1:1").Replace What:=" (*", Replacement:="", MatchCase:=False
with .cells(1,1)
.Copy
.pastespecial xlpasteformats
end with
End With
Application.cutcopymode = False
Gruß aus'm Pott
Udo
Anzeige

Forumthreads zu verwandten Themen

Datei schließen über VBA
Torsten

Hallo beisammen,
mit folgendem Code kopiere ich eine Datei unter einem anderen Namen und öffne die neue Datei anschließend um sie weiter zu bearbeiten. Nach dem e-mail-Versand dieser Datei über LotusNotes möchte ich diese Datei wieder schließen und dann Löschen. Es funktioniert alles einwan...
09.05.2005 20:08:28
Thread-ID: 609257
2 Beiträge
Anzeige
VBA - Excelsheet versenden (Speicherung)
Alex

Hi,
ich bin im Internet fündig geworden um mein bestehendes Excelsheet zu versenden. Leider bin ich kein VBA Profi und habe da noch ein kleines Problem. Ich hoffe mir kann dabei einer helfen.
Momentan ist es so das die Datei als .xlsm verschickt wird. Mir wäre es am liebsten wenn er die...
09.11.2016 16:47:25
Thread-ID: 1523888
4 Beiträge
Datei schließen über VBA / Hilfe bei Code
Torsten K.
Hallo beisammen,
eine Datei ("Blanco_INVBU.xls")/("wb1") möchte ich unter anderem Namen ("IT_Budget_2005.xls")/("wb2") speichern, diese Kopie dann öffnen, einige WS löschen, überflüssigen VBA-Code und Buttons löschen, als Mail-Anhang direkt aus Excel versenden, wieder schließen und dann die Kop...
17.08.2005 14:19:15
Thread-ID: 653674
5 Beiträge
Erstellen neuer Exceldatei Vba
Felix

Hallo zusammen,
ich habe folgendes Problem und konnte bisher keine passende Lösung finden.
Ich habe ein Kalkulationstool programmiert welches am Ende der Kalkulation alle Daten in eine Übersicht kopiert.
Durch klicken eines Buttons sollen nun 2 Datein erzeugt werden.
1. Eine Kop...
17.08.2016 17:15:02
Thread-ID: 1509801
5 Beiträge
Code läuft nicht bei geschütztem Projekt
Fritz_W

Hallo VBA-Experten,
von Josef Ehrensberger habe ich nachfolgenden Code, der (makrofreie) für jeden Eintrag im Zellbereich A1:A20 der Tabelle 1 Kopien der Datei erstellt, die jeweils nach jedem Zelleintrag aus A1:A20 benannt werden und in den gleichen Ordner wie die Quelldatei kopiert werden...
22.10.2009 15:07:39
Thread-ID: 1111348
2 Beiträge
VBA hilfe
Tim

Hallo zusammen,
dieser Code ist hinter einen Button hinterlegt:
Sub Buero() On Error GoTo Fehler Dim WB1, WB2 Application.ScreenUpdating = False Set WB1 = Workbooks("Nachschub Rollregal Analyse.xlsm") Workbooks.OpenText Filename:= _ "G:\Transfer\Allgemein\Datei Txt\Platzkapazität GD16 R...
21.12.2017 06:42:35
Thread-ID: 1598398
4 Beiträge
Anzeige
VBA Code
Chris

Hallo zusammen,
ich stehe gerade auf dem Schlauch mit dem zusammenfügen zweier VBA Codes, die jeweils mit einem Formularsteuerelement (Button) gestartet. Nun möchte ich den Code von nur einem Button aus starten lassen. Ich habe mit meinen bescheidenen Fähigkeiten bereits alles versucht, bek...
29.04.2020 17:05:39
Thread-ID: 1755684
10 Beiträge
Verschiedene Excelversionen
Tom

Hallo Ihr Alle.
Ich haben nachfolgenden VBA-Code in einer Datei eingebaut. Funkitoniert auch alles unter Version 2002. Nun wollte das Ganze ein Arbeitskollege unter Excel 2000 starten. Da funktioniert es nur bis an die Stelle wo es darum geht die Daten/Werte einzufügen (Markierung). Werden...
02.07.2007 21:36:00
Thread-ID: 883285
3 Beiträge
Anzeige
Formatierung Ergebnisbereich
Peter
Folgende Aufgabe:
Ich frage Daten von einem MS_SQL-Server mit Power Query ab und lade diese Daten in eine Tabelle innerhalb eines Arbeitsblattes. Bei den Daten handelt es sich um eine Baugruppen-Strukturstückliste. Die Datenübergabe funktioniert zuverlässig. Die optische Aufbereitung der Daten i...
01.06.2022 20:37:01
Thread-ID: 1885790
4 Beiträge
Arbeitsmappe schliessen
René

Hallo
Ich habe eine Excel-Datei erstellt wo ich ein Button "Transfer SAP" mit einem Code versehen haben. Mit diesem Button wird die Datei in ein definiertes Verzeichnis gespeichert. Weiter werden relevante Daten in bestimmte Zellen kopiert.
Nun möchte ich, dass man beim Speichern der Da...
09.10.2009 17:52:42
Thread-ID: 1108601
2 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum