alle Tabellenblaetter, Kopfzeile, Bild einfuegen
Hallo Reinhard,
doch, ich mache etwas daraus, aber wie Du schon selbst gesagt hattest, sind die Redundanzen zu gross gewordne.
Bezueglich des Missverstaendnisses mit den Begrifflichkeiten kann ich nur um Verzeihung bitten.
Natuerlich meine ich demzufolge alle Tabellenblaetter.
Ich meochte doch nur das Bild in allen Tabellenblaetter sehen - mehr nicht.
Viele Dank & viele Gruesse
Michael
PS: Die Loesungsansaetze mit einer geswchweiften Klammer etc. sagen mir nichts bzw. kann damit nichts anfangen - sorry.
Hallo Michael,
Wie kann ich denn ein Makro aufzeichnen - sorry?
DAS ist genau das was mich gewaltig nervt.
Anstatt wie es ziig Tausende tun würden in so einem Fall, einfach nachfragen wie man denn ein Makro aufzeichnet, präsentierst du irgendeinen Code 
((
Wie schon oft rückst du dann mit der Wahrheit erst nach Nachfragen irgendwann oder auch nicht heraus.
EntwicklerTools—Makroaufzeichnen.
Und warum hat dein Vorschlag eigentlich nicht funktioniert?
Also bezueglich der Gruppierung und dann der Einfuegung des
Bildes?
Seltsam!
Was soll ich dazu sagen, bei mir funktioniert das Vorgehen.
Und meine Motivation ist auf Null dich mit 50 Fragen Bzw. in 50 Beitragsfolgen zu löchern bis ich endlich dahinterkomme was du da anders gemacht hast.
Gruß
Reinhard
Fremdsprachlicher Wochentag Datum englisch
Apropos noch einmal: wie bekomme ich nun das Datum in Englisch
hin?
Hallo Michael,
Sub tt()
Dim Tage, intTag As Integer
Tage = Array(„M“, „T“, „W“, „Thursday“, „F“, „S“, „S“)
intTag = Weekday(Date, vbMonday) - 1
MsgBox Tage(intTag) & Format(Date, " dd.mm.yyyy")
End Sub
Gruß
Reinhard
Grüezi Michael
Und BTW um die Begrifflichkeiten zu klären:
Was genau verstehst Du unter ‚Arbeitsmappe‘?
Unter eine Arbeitsmappe bei Excel verstehe ich ein neues
Arbeitsblatt, also im unteren Raster habe ich dann zwei
Fenster zur Verfuegung (Blatt 1 und Blatt 2)
Dann passe bitte schleunigst dein Verständnis und deine Ausdrucksweise an die in Excel übliche an - die Nachfragen werden dann deutlich abnehmen und vielleicht wird dann auch jeweils klarer was Du meinst.
Innerhalb dieser Datei (aka Arbeitsmappe) gibt es dann
verschiedene Tabellenblätter, die unten am Fenster-Rand als
Reiter dargestellt werden.
Dann sind es Tabellenblaetter - sorry.
Fein, dann bleibe nun dabei…
Geht es dir nun also generell um alle Dateien (aka
Arbeitsmappen) oder um alle Tabellenblätter innerhalb einer
definierten Arbeitsmappe?
Es geht mir um alle Tabellenblaetter innerhalb einer vorher
definierten Arbeitsmappe.
…denn das hier ist eine klare und verständliche Aussage, die von jedermann ohne Nachfrage verstanden werden kann.
Mir ist schon klar, dass Excel nicht immer einfach zu verstehen ist - aber wenn Du damit arbeiten willst/sollst, dann musst Du dir diese Begrifflichkeiten aneignen wenn Du erfolgreich sein willst.
Hast Du denn nun ein englisches System oder nicht?
Diese Antwort nach der Version bist Du uns schon seit geraumer
Zeit schuldig…
Ich habe ein englisches Betriebssystem, Microsoft ist in
Englisch, aber irgendwie sind z.T. auch Sachen in Deutsch. 
Tja, und dieses ‚irgendwie‘ musst Du halt auch noch klären - wir können das bestimmt nicht.
Ist es eine Multi-Language-Version - also englisch aufgesetzt und dann das deutsche Sprachpaket ‚aufgepfropft‘?
Oder was ist es dann - eine verkorkste Installation?
Auch diese Infos wie auch die Excel-Version an sich (2003 oder 2007 oder was ganz anderes) sind in der Regel bei jeder neuen Frage notwendig, denn ich persönlich kann mit nicht über mehrere Hundert Anfragen merken wer denn nun welche Version zur Verfügung hat (zumal das auch noch ändern kann).
Mit freundlichen Grüssen
Thomas Ramel
Hallo,
DAS ist genau das was mich gewaltig nervt.
Anstatt wie es ziig Tausende tun würden in so einem Fall,
einfach nachfragen wie man denn ein Makro aufzeichnet,
präsentierst du irgendeinen Code ((
Ja, ich denke aber, erst sollte man einmal versuchen, selbst damit zu Recht kommen. Ist aber bedauerlicherweise gescheitert…
Was soll ich dazu sagen, bei mir funktioniert das Vorgehen.
Und meine Motivation ist auf Null dich mit 50 Fragen Bzw. in
50 Beitragsfolgen zu löchern bis ich endlich dahinterkomme was
du da anders gemacht hast.
Ich gehe auf das erste Tabellenblatt(!), gehe mit gedrueckte Shift Taste auf das letzte Tabellenblatt, dann sind alles Blaetter angeklickt (gruppiert), gehe dann in die Kopfzeile beim ersten Tabellenblatt (alle Blaetter sind noch angeklickt), und fuege das Bild im linken Bereich in der Kopfzeile ein.
Danach hat sich leider nicht geaendert, wenn ich es mir in der Seitenansicht anschaue.
Denke, dass dies nun auch ausfuehrlich gewesen ist.
Viele gruesse
Michael
Hallo Reinhard,
dank erst einmal fuer das Makro
Sub tt()
Dim Tage, intTag As Integer
Tage = Array(„M“, „T“, „W“, „Thursday“, „F“, „S“, „S“)
intTag = Weekday(Date, vbMonday) - 1
MsgBox Tage(intTag) & Format(Date, „dd.mm.yyyy“)
End Sub
Habe es entsprechend ersetzt, aber es hat sich nichts getan.
Habe ich es denn 1x1 zu ersetzen?!
Danke.
Grüezi Michael
Ich gehe auf das erste Tabellenblatt(!), gehe mit gedrueckte
Shift Taste auf das letzte Tabellenblatt, dann sind alles
Blaetter angeklickt (gruppiert), gehe dann in die Kopfzeile
beim ersten Tabellenblatt (alle Blaetter sind noch
angeklickt), und fuege das Bild im linken Bereich in der
Kopfzeile ein.
Danach hat sich leider nicht geaendert, wenn ich es mir in der
Seitenansicht anschaue.
Hast Du das mit einer neuen leeren Mappe getestet oder mit derjenigen in der Du alle vergangenen Versuche vorgenommen hast?
Denn mir einer neuen Mappe klappt das hier problemlos genau so wie Du es hier schilderst (sofern in den Tabellenblättern auch etwas zum Ausdrucken enthalten ist).
Mit freundlichen Grüssen
Thomas Ramel
Hallo,
habe nachgeschaut:
Sowohl das Betriebssystem als auch Mircosoft ist in Englisch, daher geht auch nicht die Rechtschreibung fuer deutsche Texte.
So, das darf nun eindeutig sein. Mit der Hoffnung auch, dass nun mein Problem geloest werden kann.
Vielen Gruesse
Michael
Hallo,
Hast Du das mit einer neuen leeren Mappe getestet oder mit
derjenigen in der Du alle vergangenen Versuche vorgenommen
hast?
In der, in der ich alle vergangenen Versuche vorgenommen habe.
Ich probiere es jetzt noch einmal… (denke aber nicht, dass es jetzt klappen wird - na ja, bei Excel weiss man ja nie J).
Viele gruesse
Michael
Sub tt()
Dim Tage, intTag As Integer
Tage = Array(„M“, „T“, „W“, „Thursday“, „F“, „S“, „S“)
intTag = Weekday(Date, vbMonday) - 1
MsgBox Tage(intTag) & Format(Date, „dd.mm.yyyy“)
End Sub
Habe es entsprechend ersetzt, aber es hat sich nichts getan.
Habe ich es denn 1x1 zu ersetzen?!
Hallo michael,
k.A. was du da wo wie 1:1 ersetzt hast.
Die ersten drei Zeilenn gehören in dein Makro, Oberhalb davon wo due das formatierte Datum haben willst.
Dim Tage, intTag As Integer
Tage = Array(„M“, „T“, „W“, „Thursday“, „F“, „S“, „S“)
intTag = Weekday(Date, vbMonday) - 1
In deinem Code ersetzt du dann
Format(date,„dd.mm.yyyy“)
durch
Tage(intTag) & Format(Date, „dd.mm.yyyy“)
Nichts mehr, nichts weniger und vor allem nix annerster machen!
Gruß
Reinhard
Grüezi Michael
Hast Du das mit einer neuen leeren Mappe getestet oder mit
derjenigen in der Du alle vergangenen Versuche vorgenommen
hast?
In der, in der ich alle vergangenen Versuche vorgenommen habe.
Ja, das hatte ich angenommen befürchtet
Mach das mal in einer neuen leeren Mappe - die Du da hast dürfte inzwischen korrumpiert sein, also lieber neu machen.
Ich probiere es jetzt noch einmal… (denke aber nicht, dass
es jetzt klappen wird - na ja, bei Excel weiss man ja nie J).
Nicht denken - seriös umsetzen 
…und meistens ist es nicht Excel sonder die/der/das zwischen Monitor und Stuhl-Lehne…
Mit freundlichen Grüssen
Thomas Ramel
Grüezi Michael
habe nachgeschaut:
Sowohl das Betriebssystem als auch Mircosoft ist in Englisch,
daher geht auch nicht die Rechtschreibung fuer deutsche Texte.
So, das darf nun eindeutig sein.
Keineswegs - das sind keine weiteren Informationen als bisher.
Excel-Version und ob es eine MUI-Installation ist weiss noch immer keiner.
Frage mal nach bei dem der dir den PC aufgesetzt hat, was er da mit Office ‚angestellt‘ hat.
Mit freundlichen Grüssen
Thomas Ramel
Guten Tag,
Ja, das hatte ich angenommen befürchtet
Es ist eben so, wie es ist.
Mach das mal in einer neuen leeren Mappe - die Du da hast
dürfte inzwischen korrumpiert sein, also lieber neu machen.
Es muss aber in dieser Mappe sein. ich habe es genauso gemacht, wie es mir befohlen worden ist. J
Oder sollte man ein Maro unter diesen Umstaenden dafuer verwenden?
Nicht denken - seriös umsetzen w
Habe ich - nicht funktioniert. So schoen um Wahr zu sein.
…und meistens ist es nicht Excel sonder die/der/das zwischen
Monitor und Stuhl-Lehne…
Ha ha…
Viele Gruesse
Michael
Grüezi Michael
Ja, das hatte ich angenommen befürchtet
Es ist eben so, wie es ist.
Mach das mal in einer neuen leeren Mappe - die Du da hast
dürfte inzwischen korrumpiert sein, also lieber neu machen.
Es muss aber in dieser Mappe sein. ich habe es genauso
gemacht, wie es mir befohlen worden ist. J
Oder sollte man ein Maro unter diesen Umstaenden dafuer
verwenden?
Wenn die Mappe korrumpiert ist (und das scheint sie wohl zu sein, da offenbar nichts so richtig klappt) macht es keinen Sinn daran/darin weiter rumzudoktern.
Versuche es daher trotzdem mal mit einer neuen leeren Mappe.
Wenn das dort klappt, dann übertrage deine Daten in diese neue Mappe.
Anders wird da kein Schuh mehr draus.
Nicht denken - seriös umsetzen w
Habe ich - nicht funktioniert. So schoen um Wahr zu sein.
Das klingt hier aber ganz anders - Du hast keine neue Mappe genommen sondern deine alte die ‚kaputt‘ ist.
Mit freundlichen Grüssen
Thomas Ramel
Hallo,
es verwirrt mich ebenfalls total, was hier geschrieben wird.
Ganz einfach:
Habe nun folgende Makros (was ist der Plura - keine Ahnung)
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
wks.PageSetup.RightHeader = Format(Date, „dddd, yyyy-mmmm-dd“)
Next wks
End Sub\
Sub tt()
Dim Tage, intTag As Integer
Tage = Array(„M“, „T“, „W“, „Thursday“, „F“, „S“, „S“)
intTag = Weekday(Date, vbMonday) - 1
MsgBox Tage(intTag) & Format(Date, „dd.mm.yyyy“)
End Sub
Die ersten drei Zeilenn gehören in dein Makro, Oberhalb davon
wo due das formatierte Datum haben willst.
Die ersten 3 Zeilen gehoeren in dein Makro? Welche jetzt? Habe ich es hinzuzufuegen oder zu ersetzen?
Ich weiss es wirklich nicht! *seufz
Nichts mehr, nichts weniger und vor allem nix annerster
machen!
Leichter gesagt als getan!
Viele gruesse
Michael
PS: Mit welcher Tastenkombination kann ich nun eine Zeile oder Spalte ‚einrahmen‘, um den Ueberblick nicht zu verlieren?
Den passenden Thread finde ich leider nicht.
Guten Nachmittag,
Keineswegs - das sind keine weiteren Informationen als bisher.
Excel-Version und ob es eine MUI-Installation ist weiss noch
immer keiner.
Excel Version: 2007 (Home & Student Version in Englisch - selbst installiert )
Viele gruesse
Michael
Hallo,
wie kann denn eine ‚Mappe‘ kaputt sein? *dumm gefragt.
Bei der neuen Mappe klappt es. Kannst Du mir kein Makro zur Verfuegung stellen, damit ich es auch in der ‚alten Mappe‘ benutzen kann?
Ansonsten muss ich es fuer jedes Tabellenblatt manuell einfuegen…
Viele gruesse
Michael
Grüezi Michael
wie kann denn eine ‚Mappe‘ kaputt sein? *dumm gefragt.
Das im Detail zu erläutern würde etwas zu weit führen.
Nimm es als gegeben, dass beim vielen ‚Rummachen‘ mit Copy/Paste und wieder löschen, sowie Veränderungen im VBA-Code Informationen im Hintergrund der Mappe zurückbleiben die dazu führen können, dass einen Mappe korrupt wird und nicht mehr korrekt funktioniert.
Verhindern oder gar reparieren lässt sich dieser Zustand, einmal eingetreten, nicht.
Bei der neuen Mappe klappt es.
Fein (siehste - geht ja)
Kannst Du mir kein Makro zur
Verfuegung stellen, damit ich es auch in der ‚alten Mappe‘
benutzen kann?
Ansonsten muss ich es fuer jedes Tabellenblatt manuell
einfuegen…
2x Nein
Erstelle die Mappe sauber neu, dann klappt das auch wieder.
Mit freundlichen Grüssen
Thomas Ramel
Hallo,
Fein (siehste - geht ja)
Na ja.
2x Nein
Erstelle die Mappe sauber neu, dann klappt das auch wieder.
Geht es nicht, oder moechtest Du es nicht?
Dafuer brauche ich Zeit, um alles fein und sauber uebertragen zu koennen…
Viele gruesse
Michael
Grüezi Michael
2x Nein
Erstelle die Mappe sauber neu, dann klappt das auch wieder.
Geht es nicht, oder moechtest Du es nicht?
Es geht nicht - korrupt ist korrupt, das habe ich doch eben schon erklärt.
Dafuer brauche ich Zeit, um alles fein und sauber uebertragen
zu koennen…
Ja, das ist mir klar, aber leider unumgänglich, wenn Du eine sauber funktionierende Mappe haben willst.
Magst Du das Ganze nicht neu aufbauen, dann musst Du mit den Einschränkungen die bereits jetzt auftreten leben und auch in Kauf nehmen, dass künftig weitere hinzukommen.
Diese ‚Kosten/Nutzen‘-Analyse kannst nur Du für dich alleine anstellen.
Geht es nicht, oder moechtest Du es nicht?
…und ab jetzt möchte ich mich auch nicht mehr weiter damit befassen.
Ich hab mal was geschrieben vom Kind, das in den Brunnen gefallen ist - jetzt mache ich da noch einen Deckel drauf.
So long
Thomas Ramel