Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1268to1272
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

If IsNumeric(Application.Parent.Name) Then

If IsNumeric(Application.Parent.Name) Then
Peter
Guten Tag
Warum bringt untenstehende Funktion einen Fehler, wenn der Tabellenname nicht numerisch ist?
Gruss, Peter
https://www.herber.de/bbs/user/80841.xlsm
Public Function TabName() As Long
Debug.Print Application.Caller.Parent.Name
If IsNumeric(Application.Parent.Name) Then
TabName = Application.Caller.Parent.Name * 1
Else
TabName = Application.Caller.Parent.Name
End If
End Function

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: If IsNumeric(Application.Parent.Name) Then
03.07.2012 07:32:22
Gerd
Hallo Peter,
der Fehler tritt auf, weil Du den Rückgabewert der Funktion als Ganzzahl (Long) deklariert hast.
Gruß Gerd
AW: vielen Dank! owT
03.07.2012 07:35:56
Peter
If IsNumeric(Application.Parent.Name) Then
03.07.2012 10:24:53
Rudi
Hallo,
Application.Parent.Name ist doch immer Microsoft Excel
Fehlt dir da nicht der Caller?
Und natürlich As Long weg!
Gruß
Rudi
AW: If IsNumeric(Application.Parent.Name) Then
03.07.2012 13:12:04
Peter
Hallo Rudi
Du hast recht!
Danke!
Peter
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige