Office: Druckbereich per VBA in anderer Mappe - seltsames Verhalten

Hallo Forum,

manchmal ist VBA echt zum Mäusemelken...
In der Firma zickt Excel rum, und Zuhause ist der Fehler nicht wiederholbar.
Im Gegenteil sind sogar plötzlich zwei unterschiedliche Schreibweisen möglich...



Gegeben:

Eine Excelmappe zur Verwaltung von Palettenkonten ist geöffnet und ein Kontoauszug soll erstellt werden.
Dazu wird mittels Makro ein Vorlagenblatt kopiert.
Dadurch öffnet sich automatisch eine neue Mappe.
Diese neue Mappe wird gespeichert, benannt, das Blatt wird gefüllt usw...
Was halt alles so nötig ist.

Und weil der Kontoauszug dann auch noch gedruckt werden soll (manuell, nicht per VBA),
und ich es nervig finde jedes mal die Druckeinstellungen von Hand zu machen,
wird der Druckbereich halt auch direkt per Makro definiert (immer die gleichen Spalten, nur die Zeilen variieren).

Und genau da verstehe ich etwas nicht.



Problem:

Der Druckbereich wird dynamisch über Variablen ermittelt und als String übergeben.
Zuhause haben folgende Zeilen fehlerlos geklappt:

Code:

' Bereich "Druckbereich" erstellen
    strBereich = "=" & .Name & "!$A$3:$F$" & strLetzte
    .Names.Add Name:="Druckbereich", RefersTo:=strBereich

In der Firma (auch XP und Office 2007, aber Netzwerk - Einzelplatzrechner mit Server) gabs genau dort immer eine Fehlermeldung,
bis ich zwei Apostrophs eingefügt habe:

Code:

' Bereich "Druckbereich" erstellen
    strBereich = "='" & .Name & "'!$A$3:$F$" & strLetzte
    .Names.Add Name:="Druckbereich", RefersTo:=strBereich

Auf diese Idee bin ich auch nur gekommen, weil ich im Namensmanager einiges verglichen habe um dem Fehler auf die Spur zu kommen.
Dort wurde der Bereich halt auch als:

Code:

='Nebenblatt'!$A$3:$F$20

und nicht als:

Code:

=Nebenblatt!$A$3:$F$20

angezeigt.



Okay, habe ich halt zwei kleine Striche mehr im Code.
Aber jetzt Zuhause wollte ich das ganze mal testen, weil ich innerhalb der gleichen Mappe bei der Definition von Druckbereichen keinen Apostroph benötige.
Und siehe da, bei mir Zuhause funktionieren beide Schreibweisen bisher fehlerlos, und im Namensmanager wird beides ohne Apostroph angezeigt.



Kann sich eventuell jemand einen Reim drauf machen?



In der angefügten Beispielmappe ist der Code aus der Original-Datei übernommen worden.
Habe ihn nur kurz angepasst und alles drumherum weggelassen.

Der Button "Druckbereich" definiert den Druckbereich vom "Hauptblatt".
Der Button "Copy und Druckbereich 1" kopiert das "Nebenblatt" und definiert den Druckbereich in der Kopie, ohne Apostroph.
Der Der Button "Copy und Druckbereich 2" macht das Gleiche, mit Apostroph.

Die beiden angehängten Mappen sind identisch, bis auf das Dateiformat.
Aber daran scheint es auch nicht zu liegen.

 

Re: Druckbereich per VBA in anderer Mappe - seltsames Verhal

Die Referenz auf einen Bereich setzt sicht grundsätzlich so zusammen:

Code:

='Laufwerk+Pfad\[Dateiname]Blattname'!Zellbezug

Sind beide Mappen gleichzeitig geöffnet, kürzt sich der Laufwerks-Teil weg:

Code:

='[Dateiname]Blattname'!Zellbezug

Bei Bezügen innerhalb der gleichen Mappe entfällt der erste Teil und es kürzt sich auf:

Code:

='Blattname'!Zellbezug

Und, völlig gewohnt, innerhalb des gleichen Blatts entfällt der nächste Teil:

Code:

=Zellbezug

Die ' gehören also grundsätzlich dazu, wenn das aktuelle Blatt verlassen wird, aber... Wenn bei einem Bezug auf ein anderes Blatt der Blattname kein Leerzeichen enthält, dann kürzt Excel die ' auch noch weg. Sollte auch der Pfad und Dateiname kein Leerzeichen enthalten, bleiben die ' aber wiederum trotzdem erhalten.

Interessant, was Du aber auch schon festgestellt hast: Die ' zu viel angeben, ist überhaupt kein Problem, weil Excel die eben ggf. wegkürzt. Sie aber nicht anzugeben, fährt gegen die Wand, wenn auf Grund eines Leerzeichens dann der Zellbezug nicht aufgelöst werden kann. Und Leerzeichen in Pfadangaben sind ja mittlerweile Gang und Gebe ('Dokumente und Einstellungen'...).

Gruß, Michael

 

Hallo Michael,

mal wieder ganz lieben Dank an Dich für eine klasse Erklärung.

*vor Kopf batsch*
Da muss man erst mal drauf kommen.

Vor allem, wenn in Beispielcode den man so im Netz findet die ' nicht enthalten sind, nirgendwo ein Hinweis darauf stand, und obendrein der ver..*#?+! Makrorekorder sie auch nicht ausspuckt.
*grummel*

Najut, dann werde ich die Strichelchen mal sicherheitshalber überall ergänzen und sie mir merken.