Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
272to276
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
272to276
272to276
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Warum kann dieser Code nicht ausgeführt werden

Warum kann dieser Code nicht ausgeführt werden
01.07.2003 15:38:19
Benjamin
Hi all,
mit diesem Code will ich bestimmte Formelzellen kopieren und sie in eine andere Datei einfügen. Leider kommt immer Fehler: Laufzeitfehler 438, Objekt unterstützt diese Eigenschaft oder Methode nicht.
Kann jemand einem Anfänger sagen wo er den Fehler gemacht hat?
Danke im Vorraus
Benjamin

Sub Formeln_korrigieren()
Workbooks.Open "\\BCHHMAIN\DEPART\GLOBAL\Benjamin Riesen\Reports kopie.xls", UpdateLinks = 0
Range("D1:AB70").Select
ActiveWindow.Selection.Copy
ActiveWindow.ActivateNext
Range("D1:AB70").Select
ActiveWindow.Selection.Paste
Range("A1").Select
ActiveWindow.ActivateNext
ActiveWindow.Close
End Sub

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 16:06:13
ChrisL
Hi Benjamin
Von wo nach wo willst du nochmals kopieren?
D1:AB70 aus 'Reports kopie.xls' in die aktuelle Mappe A1 und dann 'Reports kopie.xls' wieder schliessen?
Gruss
Chris

AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 16:12:16
Benjamin
Hi,
ja. Die aktuelle Mappe ist Reports.xls.
Ich will von reports kopie.xls d1:AB70 nach reports.xls d1:Ab70 kopieren.
Es handelt sich um zwei gleiche Dateien.
Die Datei bekommt durch einen Export aus Access viele, viele Sheets.
Diese muss ich löschen bevor wieder neue Sheets aus Access exportiert werden können da die Sheets immer die gleichen Namen haben. Beim Löschen gehen aber die Formeln flöten. Somit habe ich eine Kopie der Datei erstellt von wo ich die Formeln nach dem Export wieder kopiere.
War das verständlich?`
LG Ben

Anzeige
AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 16:28:02
ChrisL
Hi Ben
Versuchs mal hiermit...
Option Explicit

Sub Formeln_korrigieren()
Application.ScreenUpdating = True
Workbooks.Open "C:\BCHHMAIN\DEPART\GLOBAL\Benjamin Riesen\Reports kopie.xls"
With Workbooks("Reports kopie.xls")
.Sheets(1).Range("D1:AB70").Copy ThisWorkbook.Sheets(1).Range("A1")
.Close
End With
Application.ScreenUpdating = False
End Sub

(Von Blatt 1 nach Blatt 1 der jeweiligen Datei)
Gruss
Chris

AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 16:42:50
Benjamin
Hi,
danke. Aber warum setzt Du screenUpdating erst auf true und am ende auf false?
Meinst Du es andersherum?
LG Ben

Anzeige
AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 16:58:48
ChrisL
Hi Ben
Hast natürlich recht... genau umgekehrt... kleiner Test ;-)
Gruss
Chris

AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 18:05:08
Benjamin
Hi nochmal,
leider komme ich erst jetzt zum Testen. Meine Kollegen haben mich gerade aufgehalten.
Leider werden die Zellen ab Zelle a1 in Reports.xls eingefügt, somit gibt es allerlei Fehlermeldungen und Zirkelbezüge.
Magst Du bitte nochmal schauen?
DAnke
lg ben

AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 18:08:08
ChrisL
Hi Ben
Ändere mal A1 in D1
Gruss
Chris

AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 18:17:52
Benjamin
Suuuuper Kollege.
Ich verstehe den Code zwar nicht richtig, aber er funktioniert.
Danke
P.S. Hast Du zufällig auch noch eine Ahnung wie man den Pfad anpassen kann?
Ich mache es manuell mit Suchen/Ersetzen. Wenn ich das aufzeichne bekomme ich folgenden Code:
bla, bla...
Selection.Replace What:= _
"\\BCHHMAIN\DEPART\GLOBAL\Benjamin Riesen\[Reports kopie.xls]", Replacement:= _
"", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False
Leider funktioniert das mit dem Code nicht wenn ich ihn ausführe. Es passiert rein gar nichts bis auf ein kurzes Flimmern auf dem Bildschirm.
Bin ich da zu blöd?

Anzeige
AW: Warum kann dieser Code nicht ausgeführt werden
01.07.2003 20:12:14
ChrisL
Hi Ben
Gern geschehen...
Was willst du denn nun wieder ;-)))
ähhhm... gehe mal aus du willst eine Verknüpfung im Tabellenblatt ändern. Der Code bezieht sich auf den selektiereten Bereich. Hast du vielleicht nicht selektiert?
Oder vielleicht so...
ActiveSheet.Range("A1:X100").Replace What:= _
"\\BCHHMAIN\DEPART\GLOBAL\Benjamin Riesen\[Reports kopie.xls]", Replacement:= _
"", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False
die Range angeben.
Gruss
Chris

AW: Warum kann dieser Code nicht ausgeführt werden
02.07.2003 08:20:27
Benjamin
Hi,
doch das habe ich vorher steht noch Range...
Habe schonmal im Forum eine Frage dazu gelesen, (suchen/ersetzen funktioniert manuell aber nicht per Makro) aber das Problem wurde dann anders gelöst. Das Archiv hilft auch nicht so richtig weiter.
O.K. ich werd´ weiter versuchen.
Danke auf jeden Fall

Anzeige

306 Forumthreads zu ähnlichen Themen

Die Arbeitsmappe kann nicht geschlossen werden!
Andreas

Die Arbeitsmappe kann nicht geschlossen werden, da sie von einer anderen
Arbeitsmappe verwendet wird!"
Diese Meldung bekomme ich in Excel 2007, wenn ich in meinem VBA- Code
"workbooks.close" verwende.
Es sind aber keine weiteren Mappen geöffnet, kann mir da jemand weiterhelfen?<...
13.08.2008 20:56:05
Thread-ID: 1001659
2 Beiträge
Anzeige
Pivottable kann in 2003 nicht bearbeitet werden
Ralf

Hallo,
ein Kunde von mir arbeitet seit einiger Zeit mit Excel 2007 und erstellt
umfangreiche PivotTables.
Da einige Mitarbeiter aber noch mit Excel 2003 arbeiten, müssen diesen die Dateien
im 2003-Format zur Verfügung gestellt werden. Dabei wurde festgestellt, dass die
Pivot...
08.01.2009 19:08:36
Thread-ID: 1038015
3 Beiträge
Fehlermeldung "Objekt kann nicht entladen werden"
Nik

Hallo.
Bin am Verzweifeln.
Mein excel ist im VB-Editor offen und ich versuche, das Projekt zu speichern.
Es kommt immer wieder die Fehlermeldung, dass ich excel nicht speichern kann.
Im VB-Editor versuche ich, die Userform frmStart zu schließen.
Es kommt die Fehlermeldung La...
24.02.2009 13:59:02
Thread-ID: 1053502
2 Beiträge
Anzeige
Solver - Makro aufgezeichnet, lässt sich nicht abs
u_hoernchen

habe über Makro Aufzeichnen die Benutzung des Solvers aufgezeichnet. Der Code sieht dann aus wie folgt.
SolverOk SetCell:="$K$39", MaxMinVal:=3, ValueOf:="0", ByChange:="$K$16"
SolverSolve
Beim Abspielen hängt er sich dann allerdings bei "SolverOK" auf und sagt "Sub oder Function n...
20.07.2009 13:09:09
Thread-ID: 1089960
3 Beiträge
Geöffnete Datei wird nicht angezeigt...
Ruediger

Hallo zusammen,
ich habe eine Datei - mit einigen Verknüpfungen auf eine andere Datei - versuchen wollen zu öffnen. Ich werde auf gefragt, ob ich aktualisieren will oder nicht. Drücke ich aktualisieren als auch nicht aktualisieren, wird die Datei zwar geöffnet, aber nicht angezeigt.
Wo...
22.07.2009 17:02:42
Thread-ID: 1090605
3 Beiträge
Datei lässt sich nicht öffnen
einfachf

Hallo Zusammen ich schreibe gerade an einem Macro.
Dazu soll aus einer bestehenden datei eine andere Datei geöffnet werden.
Leider funzt das nicht und ich weiß nicht warum.
Hier mein Code.
Dim EX As Excel.Application
Dim WB As Workbook
Dim WS As Worksheet
Set EX = Cr...
06.08.2009 12:12:10
Thread-ID: 1094009
3 Beiträge
Zahlen werden nicht erkannt
Emanuel

Hallo,
ich habe ein Problem mit einer fremden Excel-Datei. Ich kann in Spalte G (bzw. H - war ein Selbstversuch) keine Summen bilden. Anscheinend wird diese Spalte nicht als Zahlenspalte erkannt auch nach Formatierung etc.
Könnt Ihr mir da weiterhelfen?
Viele Grüsse Emanuel
Link...
02.09.2009 11:32:24
Thread-ID: 1100009
9 Beiträge
Copy kann nicht ausgeführt werden
Heinz

Liebe Excelfreunde,
ich schlage mich schon lange mit folgendem Problem herum:
Ich habe einige Wertungsroutinen für einen Triathlon-Cup geschrieben. Da gibt es Einzel-, Gesamt- und Altersklassenwertungen. Das Ganze läuft einige Zeit. Bei der letzten (Altersklassen) Wertung gibt es plötzl...
08.10.2009 17:24:53
Thread-ID: 1108209
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
1
2
1
3
2
2
2
8
2
3
5
2
1
4
1
5
2
19
7
1
7
4
6
3