title image


Smiley Re: Tabellenblattname durch Zelleingabe variabel in einer Formel !!!????
Versuch mal:

- in ein Modul schreibst du:

'-----------------------------------------------------------

Public Function BlattName(N As Integer) As String

'-----------------------------------------------------------

BlattName = "#Fehler"

If N <= Sheets.Count Then BlattName = Sheets(N).Name

End Function



'-----------------------------------------------------------

Public Function ZellAdresse(Blatt As String, Zelle As String) As String

'-----------------------------------------------------------

ZellAdresse = Blatt & "!" & Zelle

End Function



Mit folgender Zelleingabe erhältst du dein Ergebnis :

(hier in I= Blatt#, J= Zelladresse auf dem Blatt I, K= Blattname, L= Ergebnis)







 IJKL252G11Bxx04.11.2005



K25 =BlattName(I25)L25 =INDIREKT(zelladresse(K25;J25))



Tabelle eingefügt mit Syntaxhighlighter 4.0




Neandr	            //gW
Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.11) Gecko/20071127 Firefox/2.0.0.11 - Build ID: 2007112718; 
TB version  2.0.0.9 (20071031)
jre6.0.04; MS Office 10 
Intel Pro/W LAN 2100 3B Mini PCI with WAP; 1&1 DSL mit Fritz!Box 7050/7150



geschrieben von


Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: