Thema Datum  Von Nutzer Rating
Antwort
13.04.2014 14:48:06 Michael
NotSolved
Blau Bereich drucken
 13.04.2014 15:25:50 Gast12200
NotSolved

Ansicht des Beitrags:
Von:
Gast12200		 Datum:
13.04.2014 15:25:50		 Views:
694		 Rating:
     
Antwort:
  Ja
Thema:
Bereich drucken		 
  Dim wks As Excel.Worksheet
  Set wks = Worksheets("Tabelle1")
  
  With wks.PageSetup
    .PrintArea = "A4:AF61"
  End With
  
  Debug.Print "DialogPrintPreview = " & Application.Dialogs(xlDialogPrintPreview).Show
  Debug.Print "DialogPrint = " & Application.Dialogs(xlDialogPrint).Show

Du kannst dabei in der ComboBox N Spalten anlegen und davon N-1 anzeigen (ColumnCount) lassen  - wenn der Nutzer die Bereichsangabe nicht sehen soll. In der N'ten Spalte steht dann der Bereich. So kannst du im Makro die Auswahl (ListIndex) abfragen und über diesen an den Wert in der N'ten Spalte (List(ListIndex, ColumnZIndex:=N-1)) gelangen. Diesen setzt du dann wie oben angedeutet für das jeweilige Worksheet. Beispiele zur ComboBox und allen anderen Dingen gibt es in der VBA-Hilfe reichlich zu finden.

 

Gruß

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
13.04.2014 14:48:06 Michael
NotSolved
Blau Bereich drucken
 13.04.2014 15:25:50 Gast12200
NotSolved