+ Antworten
Ergebnis 1 bis 4 von 4
  1. #1
    Admiral Avatar von logitech!
    Registriert seit
    23.08.2006
    Ort
    Bayern- mittelfranken- Fürth
    Beiträge
    10.779


    Standard MIt Programm einen ordner mit Excel Dateien öffnen und makro ausführen

    hallo,

    bin grad in der Arbeit und habe einen großen ordner mit Excel Dateien.

    Ich habe schon ein Makro erstellt damit bestimmte Spalten ausgeblendet werden.

    Doch des wäre etwas aufwendig alle zu öffnen, makro auszuführen und wieder abzuspeichern.

    Wie geht das, das alle geöffnet werden, makro ausgeführt wird, gespeichert wird und wieder alle geschlossen werden ?

    danke

  2. Wenn Du diese Anzeige nicht sehen willst, registriere Dich und/oder logge Dich ein.

  3. #2
    Korvettenkapitän Avatar von Andy65
    Registriert seit
    26.07.2008
    Ort
    Salzwedel
    Beiträge
    2.301


    • Systeminfo
      • Motherboard:
      • P67A-UD4-B3
      • CPU:
      • I7 2600K@ 4,3Ghz
      • Systemname:
      • Andy´s PC :D
      • Kühlung:
      • Scyte Mugen2
      • Gehäuse:
      • Thermaltake Shark
      • RAM:
      • G.Skill Rip.Jawes 4GB 1333Mhz
      • Grafik:
      • Zotac GTX 470
      • Storage:
      • 1 x Seagate ST31000524AS 1 TB
      • Monitor:
      • LG E2240
      • Netzwerk:
      • Getnet W-Lan
      • Sound:
      • Creativ X-Fi Titanium Fatal1ty
      • Netzteil:
      • Chieftec CFT-560-A12C
      • Betriebssystem:
      • Win 7 64Bit
      • Handy:
      • LG GM750 Windows Mobile

    Standard

    Hier diese seite könnte evt. für dich interessant sein!

    http://ms-excel.eu/

    http://ms-excel.eu/excel-vba-makro-bereich.html

    http://www.i-dietrich.de/?tipps/excel1.htm

    Seitenanzahl per Makro anzeigen:

    Sub seitenanzahl()
    Dim i As Integer
    i = ExecuteExcel4Macro("get.document(50)")

    oder?

    Automakro per VBA ausführen
    'Mit dem Aufruf RunAutoMakros werden auch automatische Makros beim Einsatz von VBA in fremden Arbeitsmappen ausgeführt:
    Workbooks.Open "test.xls"
    ActiveWorkbook.RunAutoMacros xlAutoOpen

    oder
    ActiveWorkbook.Close
    ActiveWorkbook.RunAutoMacros xlAutoClose ebenso ist der Aufruf von xlAutoActivate bzw. xlAutoDeactivate möglich.
    MsgBox "Anzahl der Seiten = " & i
    End Sub
    Geändert von Andy65 (21.01.09 um 12:10 Uhr)

  4. #3
    Admiral Avatar von logitech!
    Registriert seit
    23.08.2006
    Ort
    Bayern- mittelfranken- Fürth
    Beiträge
    10.779
    Themenstarter


    Standard

    ok danke

    wo sind die ganzen profi programmierer ?

  5. #4
    Admiral Avatar von logitech!
    Registriert seit
    23.08.2006
    Ort
    Bayern- mittelfranken- Fürth
    Beiträge
    10.779
    Themenstarter


    Standard


Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein