im lotus script fuer excel gridlines setzen

[luna]

hallo,

ich hab hier das script von eknori, export to excel.

ich moechte hier:

With xlApp.Worksheets(1)
      .PageSetup.Orientation = 2
      
      .PageSetup.centerheader = "Report - Sanyo New Projects Database"
      .Pagesetup.RightFooter = "Page &P" & Chr$(13) & "Date: &D"
      .Pagesetup.CenterFooter = ""
   End With

gerne dazuschreiben, dass er im excel gridlines setzen soll, finde aber den befehl dazu nicht. koennt ihr mir bitte helfen?  

danke und gruss,
daniela

[Semeaphoros]

Du weisst, wo Du das im Menu machst? Dann schalte doch im XLS mal die Makroaufzeichnung ein, schalte dann die Gridlines ein, schalte das Makro wieder aus und schau Dir im Makroeditor/VBA-IDE das entstandene Makro an.

[fritandr]

Hallo Daniela,

folgendes sollte eigentlich funktionieren.

Code

With xlApp.Worksheets(1)
      .PageSetup.Orientation = 2
      
      .PageSetup.centerheader = "Report - Confidential"
      .Pagesetup.RightFooter = "Page &P" & Chr$(13) & "Date: &D"
      .Pagesetup.CenterFooter = ""
   End With
   xlApp.ActiveWindow.DisplayGridlines = True

Viele Grüße
Andreas

[luna]

hallo andreas,

danke fuer deine hilfe, bist ein schatz.

ich hab's jetzt so:
With xlApp.Worksheets(1)
      .PageSetup.Orientation = 2
      
      .PageSetup.centerheader = "Report - Sanyo New Projects Database"
      .Pagesetup.RightFooter = "Page &P" & Chr$(13) & "Date: &D"
      .Pagesetup.CenterFooter = ""
      
   End With
   
   xlApp.ActiveWindow.DisplayGridlines = True
   xlApp.ReferenceStyle = 1
aber leider funzt es nicht. ich bekomm zwar jetzt keine fehlermeldung mehr, aber gridlines auch nicht. ich weiss auch nicht, ob ich das richtig verstehe, denn ich will ja die gridlines auf dem ausdruck haben, also im page setup, und nicht im dokument selber.

gruss,
daniela

[Semeaphoros]

 xlApp.ActiveSheet.PageSetup.PrintGridlines = True

Ich hab doch oben beschrieben, wie man das innert Sekunden herausbekommt?

[fritandr]

ich weiss auch nicht, ob ich das richtig verstehe, denn ich will ja die gridlines auf dem ausdruck haben, also im page setup, und nicht im dokument selber.

Ups,

Du willst drucken?!?
Dann natürlich so, wie Semeaphoros es nach mir noch beschrieben hat.

Viele Grüße
Andreas

[luna]

xlApp.ActiveSheet.PageSetup.PrintGridlines = True

Ich hab doch oben beschrieben, wie man das innert Sekunden herausbekommt?

hallo semeaphoros,

vielen dank fuer diesen befehl, mit dem hat's nun geklappt.

du hast wohl beschrieben, wie ich das innerhalb von ein paar sekunden rausbekommen kann, und stell dir vor, ich hab das auch SOFORT ausprobiert. rausgekommen ist:
.PrintGridlines = True
aber ich konnte leider mit diesem befehl nix anfangen, weil ich von lotus script absolut keine ahnung hab. darum hab ich ja hier gefragt, wie man das macht. ich hatte es mit diesem befehl probiert, aber immer eine fehlermeldung bekommen.

ich hab das auch hier ins forum reingeschrieben, was ich rausgefunden hab und welche fehlermeldung ich bekommen hab, woraufhin mir fritandr dann weiterhelfen wollte.

aber - warum weiss ich nicht - dieser eintrag ist auf einmal nicht mehr hier. kann sein, dass sich das system aufgehängt hat und der eintrag verloren ging, was weiss ich.

es gibt also keinen grund, warum du mich angreifst. ich hatte deinen tip ausprobiert, bin aber aus unkenntnis nicht weitergekommen. darum war ich hier.

gruss,
daniela

[luna]

ich weiss auch nicht, ob ich das richtig verstehe, denn ich will ja die gridlines auf dem ausdruck haben, also im page setup, und nicht im dokument selber.

Ups,

Du willst drucken?!?
Dann natürlich so, wie Semeaphoros es nach mir noch beschrieben hat.

Viele Grüße
Andreas

danke  

[Semeaphoros]

Daniela: das hat aber mit Lotus Script nix zu tun, sondern mit der Notation von Object-Basic. Und wenn Du ernsthaft mit LS arbeiten willst, solltest Du die Grundlagen unbedingt studieren und damit das Konzept von Objekten/Klassen und den Befehlen, die mit Datenstrukturen arbeiten (der WITH-Befehl) verstanden haben, dann hättest Du das auch lesen können.

Vielleicht kann hier jemand einen guten Tipp für entsprechende Lektüre geben ....

[luna]

hallo semeaphoros,

dankeschön für diese ausführung und diesen tip. ich kenne deine einstellung, habe diesen "anderen" thread heute morgen schon gelesen.

ich kann das leider momentan nicht lernen, ich mache hier blöde jobs für 5 leute, nicht nur notes sondern auch novell, und virenschutz, und telefonie, und user support und interne schulungen, und webmaster und mädchen für alles, und das für 135 user. ich kann leider nicht mal das neueste von der IT dazulernen, geschweige denn sowas wie lotus script. ich will damit auch (noch) gar nicht "richtig" arbeiten, bevor ich davon nix verstehe. aber das script von eknori war fertig und "mundgerecht", ich hab's nur reinkopiert und es funzte. wollte halt nur diese kleinigkeiten dazuhaben.

privat haben wir geheiratet, die familie fälls grad auseinander, wir wollen uns die nächsten wochen ein grundstück zulegen und ein haus bauen, und ein kind wollen wir auch  noch. so viel dazu, dass ich es privat auch nicht schaffen werde, auch zuviele freunde und hobbies.

ich gelobe: wenn ich mit dem kind zuhause bin, und mir langweilig ist, lese ich NIX ANDERES ALS SCRIPT BÜCHER!!! und dann könnt ihr mir nix mehr vormachen! dann weiss ich alles!  

vielleicht braucht ihr ja mal hilfe bei einem word formular oder einer powerpoint präsentation, bei einem kochrezept oder beim organisieren, denn da bin ich profi !

gruss, und ein schönes wochenende,
daniela

[Semeaphoros]

Na ja, volles Verständnis und Hut ab bei so viel Beschäftigung noch den Kopf oben zu behalten. Uebrigens. der ander Thread, den Du da angeschnitten hast, der passt nicht wirklich auf Dich, es gibt einen Unterschied, ob man will und weiss, dass man sollte aber einfach im Moment nicht kann (was bei Dir offensichtlich ist ...) oder ob man gradeweg sagt "Geht Dich nichts an und ich will sowieso nicht". Also sorry, wenn ich Dich auf etwas gestossen habe, was Du ja sowieso schon weisst. Im übrigen, bei den anderen Themen könnten wir wahrscheinlich auch ganz gut fachsimpeln, inkl. Kochen :-)

[luna]

 

[Semeaphoros]

Ach, jetzt weiss ich endlich, warum Dein Name Hase ist ....


Wenn Du dann über beide Ohren in Arbeit steckst, dann ist es wirklich viel .....