Herbers Excel-Forum - das Archiv
Tabelle kopieren ohne Userforms und Module?
Informationen und Beispiele zu den hier genannten Dialog-Elementen:
⇒ UserForm
- Tabelle kopieren ohne Userforms und Module? von Micha vom 27.10.2003 11:24:22
- doppelt - von ChrisL am 27.10.2003 12:00:58
- AW: Tabelle kopieren ohne Userforms und Module? - von Russi am 27.10.2003 12:01:24
- doppelt - von ChrisL am 27.10.2003 12:00:58
 |
Betrifft: Tabelle kopieren ohne Userforms und Module?
von: Micha
Geschrieben am: 27.10.2003 11:24:22
Wie kann ich die durch userforms generierte Excel Tabelle beim click auf speichern so kopieren das die userforms und module nicht mehr vorhanden sind in der erzeugten Kopie?
 |
Betrifft: doppelt
von: ChrisL
Geschrieben am: 27.10.2003 12:00:58
gehe davon aus, dass es erledigt ist...
http://xlforum.herber.de/messages/329005.html
|
Betrifft: AW: Tabelle kopieren ohne Userforms und Module?
von: Russi
Geschrieben am: 27.10.2003 12:01:24
Hallo Micha!
Kopiere die Zellinhalte in eine neue Datei:
Public
Sub DateiSpeichern()
Application.ScreenUpdating = False
Cells.Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
ActiveWorkbook.SaveAs FileName:= "blabla.xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWorkbook.Close savechanges:=False
Range("H5").Select
Application.ScreenUpdating = True
End Sub
| |