Methode "close"

Forumthread: Methode "close"

Methode "close"

22.11.2002 09:55:44

Otto

Hallo Experten,

ich habe ein Macro das grundsätzlich funktioniert.
Es endet mit ActiveWorkbook.Close
Es kommt aber eine Fehlermeldung an dieser Stelle
"Die Methode 'close' für das Object 'Workbook' ist fehlschlagen.
Woran könnte das liegen?

Vielen Dank

Otto

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Methode "close"

22.11.2002 09:58:59

Ralf Sögel
Re: Methode "close"

22.11.2002 09:59:03

Hajo_Zi
Re: Methode "close"

22.11.2002 10:04:14

Otto
Re: Methode "close"

22.11.2002 10:12:26

Hajo_Zi
Re: Methode "close"

22.11.2002 10:26:44

Otto
Re: Methode "close"

22.11.2002 10:29:49

Hajo_Zi

Re: Methode "close"

22.11.2002 09:58:59

Ralf Sögel

poste mal den Code

Re: Methode "close"

22.11.2002 09:59:03

Hajo_Zi

Hallo Otto

wäre es nicht besser gewesen den Code vor Close zu posten ???

Gruß Hajo

Re: Methode "close"

22.11.2002 10:04:14

Otto

Sub Makro1()
'
For Each b In Worksheets("Makro").Range("Namen").Cells
b.Select
Selection.Copy
ChDir "F:\REGION_C\countries.xls"
Range("B4").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.Run Range("[TM132.XLA]tm132!RECALC")
ChDir "F:\\nov02"
ActiveWorkbook.SaveAs FileName:= _
"F:\\nov02\" & b, FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWorkbook.Close
Next b
End Sub

Re: Methode "close"

22.11.2002 10:12:26

Hajo_Zi

Hallo Otto

ich vermute Du möchtest nicht das aktive schliessen sonder die Kopie


Option Explicit

	

Sub Makro1()

	For Each b In Worksheets("Makro").Range("Namen").Cells

		b.Copy

		ChDir "F:\REGION_C\countries.xls"

		Range("B4").PasteSpecial Paste:=xlValues, Operation:=xlNone

		Application.Run Range("[TM132.XLA]tm132!RECALC")

		ChDir "F:\\nov02"

		ActiveWorkbook.SaveAs Filename:= _

		"F:\\nov02\" & b, FileFormat:=xlNormal, _

		ReadOnlyRecommended:=False, CreateBackup:=False

		Windows(b).Close

	Next b

End Sub

Code eingefügt mit: Excel Code Jeanie

Gruß Hajo

Re: Methode "close"

22.11.2002 10:26:44

Otto

Hallo Hajo,

Danke, aber es funktioniert immer noch nicht.

Re: Methode "close"

22.11.2002 10:29:49

Hajo_Zi

Hallo Otto

das war mir nun ein wenig zu Aufwendig das zu testen. Der Code den Du gepostet hast sieht eigentlich ok aus. Was ist aber mit dem anderem Makro
Application.Run Range("[TM132.XLA]tm132!RECALC")

Definiere mal b

Gruß Hajo

Beliebteste Forumthreads (12 Monate)

Forumthread: Methode "close"

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread