Buchstabenausgabe bei aktivem Tabellenblatt

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Buchstabenausgabe bei aktivem Tabellenblatt
von: steve
Geschrieben am: 10.03.2005 13:06:12
Hallo,
noch ein klitzekleines Problem. Wie gesagt versuche ich den Dateinnamen automatisch erstellen zu lassen. Jetzt gibt es noch ein Problem. Ich bräuchte eine Ausgabe die wie folgt oder ähnlich aussieht:
wenn Tabellenblatt1 aktiv, dann gibt "A" nach Verknüpfungen A1 aus
wenn Tabellenblatt2 aktiv, dann gibt "B" nach Verknüpfungen A1 aus
usw.
Ich weiß zwar wie die wenn/dann Funktion funktioniert, allerdings habe ich keine Ahnung wie ich das mit dem aktiven Blatt machen soll.
Bitte um Hilfe.
MfG
Steve

Bild

Betrifft: AW: Buchstabenausgabe bei aktivem Tabellenblatt
von: steve
Geschrieben am: 10.03.2005 13:15:59
Nee anders, da ich durch dieses Makro:

Sub PDF_erstellen()
Dim sPrinter As String
Dim NewDateiname As String
Dim NewPfad As String
Sheets("Verknüpfungen").Activate
NewDateiname = ActiveSheet.Range("A23").Value
NewPfad = ActiveSheet.Range("A22").Value
Application.ScreenUpdating = False
sPrinter = Application.ActivePrinter
Application.ActivePrinter = "Acrobat PDFWriter auf LPT1:"
Drucker = Application.ActivePrinter
prtcmd = NewPfad & NewDateiname
Application.SendKeys (prtcmd), True
Application.SendKeys "{ENTER}", True
ActiveWindow.SelectedSheets.PrintOut ActivePrinter:=Drucker
Application.ActivePrinter = sPrinter
Application.ScreenUpdating = True
MsgBox "Datei " & prtcmd & " erstellt!"
End Sub

Das Tabellenblatt Verknüpfungen (in dem ist der Pfad gespeichert) muss aktiviert werden, bevor gedruckt werden kann.
Gibt es keine andere Möglichkeit. Muss ich dieses Tabellenblatt aktivieren? Kann ich nicht direkt (ählich =Verknüpfungen!A22) ansteuern?
MfG
Steve
Bild

Betrifft: AW: Buchstabenausgabe bei aktivem Tabellenblatt
von: u_
Geschrieben am: 10.03.2005 13:31:26
Hallo,
With Sheets("Verknüpfungen")
NewDateiname = .Range("A23")
NewPfad = .Range("A22")
End With
Gruß
Bild

Betrifft: AW: Buchstabenausgabe bei aktivem Tabellenblatt
von: steve
Geschrieben am: 10.03.2005 13:37:46
sehr gut, funktioniert, wieder was dazu gelernt.
Und jetzt bräuchte ich noch Frage 1.
Ich bräuchte eine Ausgabe die wie folgt oder ähnlich aussieht:
wenn Tabellenblatt1 aktiv, dann gibt "A" nach Verknüpfungen A1 aus
wenn Tabellenblatt2 aktiv, dann gibt "B" nach Verknüpfungen A1 aus
oder in Makro, dass er es mit halt ins Tabellenblatt Verknüpfungen in A1 ausgibt.
Vielen Dank für eure Hilfe
mfG
Steve
Bild

Betrifft: Im neuen Thread beantwortet. (oT)
von: Martin Beck
Geschrieben am: 10.03.2005 15:50:47

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Buchstabenausgabe bei aktivem Tabellenblatt"