Thema Datum  Von Nutzer Rating
Antwort
23.12.2008 19:29:46 Wrerner
NotSolved
24.12.2008 08:51:35 Olaf
NotSolved
24.12.2008 16:03:23 Werner
NotSolved
29.12.2008 11:29:50 jh
NotSolved
Rot Aw:Aw:Aw:Aw:Excel Speichern unter
29.12.2008 19:49:28 Werner
NotSolved

Ansicht des Beitrags:
Von:
Werner
Datum:
29.12.2008 19:49:28
Views:
970
Rating: Antwort:
  Ja
Thema:
Aw:Aw:Aw:Aw:Excel Speichern unter


Danke! Danke! Danke!
Toll das ihr einem VBA Anfänger geholfen habt!
Gruß und noch X Danke
Werner



jh schrieb am 29.12.2008 11:29:50:

Hallo,

entschuldigt wenn ich mich einmische, aber vielleicht redet bzw.
schreibt ihr alle beide ein bisschen aneinander vorbei.

1. Wenn der Filename, unter dem du die aktive Arbeitmappe speichern
willst, in einer Tabelle steht, musst du nicht GetSaveAsFilename
aufrufen.

With ActiveWorkbook
.SaveAs FileName:=.Worksheets("Tabelle6").Range("M8").Value, _
FileFormat:=xlNormal
End With

2. Wenn du statt ActiveWorkbook eine Objektvariable verwenden
willst (NewBook), muss diese erstens in einem allgemeinen Modul
Public deklariert werden:

Public NewBook As Workbook

Und zweitens muss sie, BEVOR der User den Button anklickt, mit der
aktiven Arbeitsmappe verbunden werden:

Set NewBook = ActiveWorkbook

Beachte ggf. den Unterschied zwischen ActiveWorkbook und ThisWorkbook. ThisWorkbook ist die Arbeitsmappe, die das gerade
ablaufende Makro enthält (das kann z. B. auch ein AddIn sein).
ActiveWorkbook ist die gerade aktive Mappe. Wenn sich der Button
auf einem Tabellenblatt befindet, ist beim Anklicken zwangsläufig
diese Mappe aktiv. Falls er auf einer ungebunden angezeigten Form
ist (.Show vbModeless), kann aber auch gerade eine andere Mappe
aktiv sein.

Gruß

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
23.12.2008 19:29:46 Wrerner
NotSolved
24.12.2008 08:51:35 Olaf
NotSolved
24.12.2008 16:03:23 Werner
NotSolved
29.12.2008 11:29:50 jh
NotSolved
Rot Aw:Aw:Aw:Aw:Excel Speichern unter
29.12.2008 19:49:28 Werner
NotSolved