title image


Smiley Re: Excel-Datei komprimieren
Hallo,

> Gibt es keine Komprimierung "von Haus aus", so wie bei Access?

ich glaube nicht...



Es gibt auf der CD von Herber.de ein Add-In (vbClear) das genau das macht.

Ist aber keine Freeware



> Geht es irgendwie eleganter?

tja, schreib dir ein Makro dafür. Als Ansatz mal das hier:





Sub Modul_in_neue_Datei_exportieren()  

'Modul1 dieser Mappe in neue Datei exportieren

Dim Pfad As String  



Pfad = ThisWorkbook.Path & "\Modul1.bas"



'Modul1 aus dieser Mappe exportieren

Application.VBE.ActiveVBProject.VBComponents("Modul1").Export Pfad



Workbooks.Add



'Modul1 in neue Mappe importieren

With ActiveWorkbook

  Application.VBE.ActiveVBProject.VBComponents.Import Pfad

End With  



'Kopie von Modul1 löschen

Kill Pfad



End Sub  











Gruß

Alfons

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: