Excel-Tabellenblatt automatisch aktivieren

▄ber ein Listenfeld wird eine Datenbank mit Namen abgefragt. Die Nummer des ausgewΣhlten Eintrags wird in eine Zelle ausgegeben. Anhand dieser Nummer soll ein Tabellenblatt mit gleichlautender Nummer ausgewΣhlt werden. Zum Beispiel wird in Zelle A2 die Nummer fⁿnf ausgegeben. Es soll dann das Tabellenblatt fⁿnf ausgewΣhlt werden. Wie lautet der VBA-Befehl fⁿr Excel 5.0 und Excel 97?

Angenommen, die TabellenblΣtter hei▀en ╗Tabelle1½, ╗Tabelle2½ und so weiter und die Routine startet bei einem Doppelklick auf einen Eintrag, dann lautet das Listing so: Private Sub ListBox1_t DblClick(ByVal Cancel As t MSForms.ReturnBoolean) X = Range(äa2ô).Value Y = äTabelleô & X Sheets(Y).t Select End Sub Das muss man nun nur noch an die eigenen Bedⁿrfnisse anpassen: Zeile1: ╗Listbox1½ û Bezeichnung Deiner Listbox Zeile2: ╗Range(äa2ô)½ û ╗a2½=t Ausgabezelle Zeile3: ╗ôTabelleô½ û Tabellen- blattname www.chip.de/forum/office97