Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 08:08:24
Pivot Vormonatsveränderung
26.04.2024 07:54:11
nur den ersten Eintrag in spalte zählen
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1172to1176
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1172to1176
1172to1176
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Activecell.HasName gibt es nicht aber...

Activecell.HasName gibt es nicht aber...
Franz
Hallo Freunde,
. . . ich gehe davon aus dass dies bereits gelöst ist. Habe eine Select Case Auflistung wo "Nomanes" unerwünscht sind. Wer kann mir helfen?
Gruß
Franz D.

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Activecell.HasName gibt es nicht aber...
12.08.2010 22:05:39
Henrik
Hallo Franz,
hier mal ein Ansatz: 
Sub MuhKuhSchuh()
Dim BinDrin As String
Dim rngMuhKuh As String
BinDrin = ActiveSheet.Name & "!" & ActiveCell.Address
For Each MuhKuh In Application.Names
nmeMuhKuh = MuhKuh.Name
rngMuhKuh = Mid(MuhKuh, 2, Len(MuhKuh))
If rngMuhKuh = BinDrin Then MsgBox "Sie haben 2,3 Kühe gewonnen."
Next
End Sub

Henrik
AW: Activecell.HasName gibt es nicht aber...
12.08.2010 22:16:19
Franz
Hallo Henrik,
sehr humorvoll gelöst! Danke schön. Problem: in eine "Workbook_SheetBeforeDoubleClick" Prozedur befürchte ich eine starke Bremswirkung dadurch. Hier eine Ergänzung...
. . .
Select Case ActiveCell.Name
Case [cellMoneyIt].Name
. . . für ein besseres Verständnis. Gibt es noch eine andere Möglichkeit?
Gruß
Franz D.
Anzeige
besseres Verständnis
12.08.2010 22:24:03
Uduuh
Hallo,
ich verstehe nur Bahnhof.
Evtl. per INTERSECT ?
Gruß aus’m Pott
Udo

AW: besseres Verständnis
12.08.2010 22:32:20
Franz
Hallo Uduuh,
ich möchte ohne "On error..." vermeiden dass wenn eine Zelle keinen Namen hat, die Select case Verzweigung trotzdem funktionniert. OK?
Gruß aus dem Frankenland (dort gibt es übrigens auch Bahnhöfe)
Franz D.
AW: besseres Verständnis
12.08.2010 23:22:39
Gerd
Hallo Franz,
hat das eine etwas mit dem anderen zu tun?
Sub egal()
Dim x
On Error Resume Next
x = ActiveCell.Name.Name
On Error GoTo 0
Select Case x
Case Empty: MsgBox "gib et net"
Case "erster":        MsgBox "ist erster"
Case Else:        MsgBox "nicht erster"
End Select
End Sub
Gruß Gerd
Anzeige
AW: Musste doch On error Goto nutzen
12.08.2010 23:56:58
Franz
Hallo Freunde,
Hab`s gelöst:
bHasName = HasName(Activecell)
If bHasName = False Then Exit Sub
Function HasName(rngCell As Range) As Boolean
Dim sCellName As String
HasName = True
On Error GoTo NONAME
sCellName = rngCell.Name
Exit Function
NONAME:
HasName = False
End Function

Danke für die Bemühungen.
Gute Nacht!
Franz D.

6 Forumthreads zu ähnlichen Themen

Microsoft Date and Time Picker gibt es nicht mehr
Marco

Hallo!
Wir nutzen im Excel das Steuerelement "Microsoft Date and Time Picker Control 6.0".
Seit dem letzten Windows Update gibt es dieses Steuerelement nicht mehr.
Weiß jemand wie man das wieder zum Laufen bekommt?
Grüße
Marco
11.01.2018 08:34:38
Thread-ID: 1601489
2 Beiträge
Anzeige
Gibt es einen Operator "entspricht nicht"
Daniela
Hallo Zusammen,

ich habe ein Problem bei der Programierung eines Excel-Sheets.
Hierzu möchte ich eine WENN Funktion einfügen.
Meine Abfrage sollte aber "entspricht nicht" sein.

D.h. ich möchte zwei Zellen miteinander vergleichen aber nicht auf
Gleichheit sondern auf Ung...
19.11.2003 13:51:49
Thread-ID: 340461
2 Beiträge
Makro ComboBox: Das gibt es doch nicht!!!!!
Michael

Hallo!
Wieso kann ich keine ComboBoxen auf den Sheets auswerten? ComboBoxen auf UserForms sind kein Problem, aber auf den Sheets bekomme ich allerhöchst den Index, und das auch nur über Selectieren der Box!!!
Also: Wie kann ich den Wert der Box per Makro adressieren? (nicht die Indexnum...
22.09.2004 14:29:10
Thread-ID: 489139
7 Beiträge
Anzeige
XINTZINSFUSS()-Gibt es nicht mehr?
na

hallo liebe gemeinde!
ich habe eine kurze frage.
suchte vor kurzem die obige funktion, habe sie jedoch in excel nicht mehr gefunden.
es gibt hier nur noch die funktion IKV().
weiss jemand verläßlich, ob es die funktion xintzinsfuss() noch in meiner excel-version (excel 2003) gib...
10.04.2006 10:18:25
Thread-ID: 753838
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
12
1
6
3
2