Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Tomschi vom 05.01.2019, 08:18 Options
Hoch-/Querformat per Makro ändern
Guten Morgen!
Bin unter http://www.supportnet.de/threads/1168938 fündig geworden, um Zeilen ein-/ausblenden zu lassen.
Nun möchte ich allerdings die Formatierung von quer auf hoch bzw. umgekehrt automatisieren.
Kann man dies bewerkstelligen?
Tom
Bin unter http://www.supportnet.de/threads/1168938 fündig geworden, um Zeilen ein-/ausblenden zu lassen.
Nun möchte ich allerdings die Formatierung von quer auf hoch bzw. umgekehrt automatisieren.
Kann man dies bewerkstelligen?
Tom
Antwort 1 von Hajo_Zi vom 05.01.2019, 08:26 Options
Hallo Tom,
ich hoffe mal ich habe es richtig verstanden
Range("B8").Orientation = 0 ´ waagerecht
Range("B8").Orientation = 90 ´ Senkrecht
Gruß Hajo
ich hoffe mal ich habe es richtig verstanden
Range("B8").Orientation = 0 ´ waagerecht
Range("B8").Orientation = 90 ´ Senkrecht
Gruß Hajo
Antwort 2 von Tomschi vom 05.01.2019, 08:29 Options
Hallo Hajo!
Danke für die rasche Antwort.
Sorry, aber das verstehe ich jetzt nicht.
Wer, wie, was, wo muss ich Deinen Code einflicken damit ich mein Ergebnis erhalte?
lg
Tom
Danke für die rasche Antwort.
Sorry, aber das verstehe ich jetzt nicht.
Wer, wie, was, wo muss ich Deinen Code einflicken damit ich mein Ergebnis erhalte?
lg
Tom
Antwort 3 von Hajo_Zi vom 05.01.2019, 08:33 Options
Hallo Tom,
mein Code ändert die Ausrichtung des Textes in der Zelle. Also dort wo Du die Zelle Bearbeitest muß der Code hin.
Gruß Hajo
mein Code ändert die Ausrichtung des Textes in der Zelle. Also dort wo Du die Zelle Bearbeitest muß der Code hin.
Gruß Hajo
Antwort 4 von Tomschi vom 05.01.2019, 08:36 Options
Oh, da habe ich mich wohl ein wenig unklar ausgedrückt. Sorry!
Ich möchte per Makro das Format des gesamten Arbeitsblattes umstellen.
Ciao
Tom
Ich möchte per Makro das Format des gesamten Arbeitsblattes umstellen.
Ciao
Tom
Antwort 5 von Hajo_Zi vom 05.01.2019, 08:40 Options
Hallo Tom,
ActiveSheet.PageSetup.Orientation = xlLandscape ´ Quer
ActiveSheet.PageSetup.Orientation = xlPortrait ´ längs
Gruß Hajo
ActiveSheet.PageSetup.Orientation = xlLandscape ´ Quer
ActiveSheet.PageSetup.Orientation = xlPortrait ´ längs
Gruß Hajo
Antwort 6 von Tomschi vom 05.01.2019, 08:50 Options
DANKE Hajo!
Funktioniert prima!
Wünsche ein schönes Wochenende.
Tom
Funktioniert prima!
Wünsche ein schönes Wochenende.
Tom
Antwort 7 von Tomschi vom 05.01.2019, 09:28 Options
Hi!
Jetzt ist mir noch etwas anderes eingefallen.
Besteht die Möglichkeit "herauszufiltern" ob und wenn ja, welche Spalten/Zeilen ausgeblendet wurden und/oder welches Format zur Zeit "eingestellt" ist?
Tom
Jetzt ist mir noch etwas anderes eingefallen.
Besteht die Möglichkeit "herauszufiltern" ob und wenn ja, welche Spalten/Zeilen ausgeblendet wurden und/oder welches Format zur Zeit "eingestellt" ist?
Tom
Antwort 8 von Hajo_Zi vom 05.01.2019, 09:51 Options
Hallo Tom,
MsgBox ActiveSheet.PageSetup.Orientation ´ 1=längs; 2= Quer
zum ausblenden bleibt Dir nur die Möglichkeit mit einer Schleife alle Zeiln Spalten zu prüfen.
Höhe, Breite =0 ausgeblendet
Gruß Hajo
MsgBox ActiveSheet.PageSetup.Orientation ´ 1=längs; 2= Quer
zum ausblenden bleibt Dir nur die Möglichkeit mit einer Schleife alle Zeiln Spalten zu prüfen.
Höhe, Breite =0 ausgeblendet
Gruß Hajo
Antwort 9 von Tomschi vom 05.01.2019, 10:53 Options
Nochmals danke für die Antworten.
Leider ist meiner Kollegin noch etwas eingefallen:
Kann man auch die Skallierung von 100% auf z. B. 150% per Makro umstellen?
Tom
Leider ist meiner Kollegin noch etwas eingefallen:
Kann man auch die Skallierung von 100% auf z. B. 150% per Makro umstellen?
Tom
Antwort 10 von Tomschi vom 05.01.2019, 10:58 Options
Gemeint ist die Skalierung in Seite einrichten --> Reiter Papierformat.
lg
Tom
lg
Tom
Antwort 11 von Hajo_Zi vom 05.01.2019, 11:01 Options
Hallo Tom,
code bekommt man auch raus, wenn man den Makrorecorder benutzt. Ich mache das auch oft und in Deinem Fall zu 100%
ActiveWindow.Zoom = 150
Gruß Hajo
code bekommt man auch raus, wenn man den Makrorecorder benutzt. Ich mache das auch oft und in Deinem Fall zu 100%
ActiveWindow.Zoom = 150
Gruß Hajo
Antwort 12 von Tomschi vom 05.01.2019, 12:20 Options
Hi!
Das mit dem Makrorekoder ist mir schon klar, aber ich kenne mich mit dem Code nicht aus.
Wie soll ich also wissen was welcher Eintrag zu bedeuten hat.
Habe mich allerdings fuer heuer zu einem VBA-Kurs vormerken lassen. Hoffe es klaptt, damit ich nicht mehr so viele Fragen stellen muss.
DANKE!!!
Have a nice weekend!
lg
Thomas
Das mit dem Makrorekoder ist mir schon klar, aber ich kenne mich mit dem Code nicht aus.
Wie soll ich also wissen was welcher Eintrag zu bedeuten hat.
Habe mich allerdings fuer heuer zu einem VBA-Kurs vormerken lassen. Hoffe es klaptt, damit ich nicht mehr so viele Fragen stellen muss.
DANKE!!!
Have a nice weekend!
lg
Thomas
Ähnliche Themen
Seitenzahlen
binchen580 17.04.2007 - 90 Hits - 2 Antworten
Powerpoint nur eine Seite soll ins Hochformat! Need help!!!
Volcom 30.04.2007 - 351 Hits - 1 Antwort
TEXTVERARBEITUNG
TanjaL 23.01.2008 - 22 Hits - 10 Antworten
Alle Tabellen von Hoch- zu Querformat ändern.
DanteThomas 25.04.2008 - 49 Hits - 4 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
