Zu druckende Seitenanzahl aus Zelle auslesen.

Antwort erstellen


BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet

Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Zu druckende Seitenanzahl aus Zelle auslesen.

von euroandi » Sa, 27.01.2007 18:40

Hallo Karo,
danke für Deine Antwort, was mir noch fehlt ist eine Schleife.

Ich habe es in Excel hinbekommen

Code: Alles auswählen

a = Cells(1, 1).Value 


For i = 1 To 100 

    If a < i Then 
        
    Else 
    ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i, Copies:=1, Collate:=True 
    End If 
    
    
Next i 
Gruß Andreas

von Karolus » Fr, 26.01.2007 21:31

Hallo Andreas

Bei Michael Dannenhöfer finde ich ein Beispiel : http://www.starbasicfaq.de/WiekannmanDo ... cken..html
das du mal probieren kannst, statt des fixen 'Page-value = "1-3" müsstest du dort die Zählvariable reinschreiben.

Gruß Karo

Zu druckende Seitenanzahl aus Zelle auslesen.

von euroandi » Fr, 26.01.2007 20:35

Hallo,

in der Zelle A1 steht die Anzahl der zu druckenden Seiten.

Das Macro soll diesen Wert Abfragen. (Variable)

Nun soll eine Schleife folgendes machen.

Ist Zahl (Variable) größer/gleich 1 dann Drucken Seite 1

Ist Zahl (Variable) größer/gleich 2 dann Drucken Seite 2

Ist Zahl (Variable) größer/gleich 3 dann Drucken Seite 3

und so weiter bis 100.

ist Variable kleiner dann Schleife beenden.

Gruß Andreas

Nach oben