Hall d'r Bastler,

danke für die Initiative.

Ich werde hier öfter bis oft "vorbeischauen"....

LG & ciao
thowe

Hallo,

und danke für den Tipp!

Ich mache DropDowns immer über Namensbereiche, die ich immer "dynamisch" gestalte. Mit INDEX .

zum Beispiel, Daten stehen von A2 beginnend bis (maximal) A101 (=100 mögliche Datensätze)

[STRG] + {F3] neuen Namen eingeben zum Beispiel: LstDropDownDaten
Quelle: =A2 ...

Hallo Rolf,

mangels iPhone kann ich das nicht überprüfen, jedoch scheint es so zu sein, dass Outlook bei iPhones nur inline-forward unterstützt.

Vielleicht hilft dir dieser Artikel weiter.

https://www.iphoneblog.de/2018/02/27/ip ... terleiten/

lg & ciao
thowe

edit: 29.09.2022 -> diverse Tippfehler

Hallöchen,

eine kleine Funktion die die E-Mail Adresse in einer Excel-Zelle überprüft


Public Function CheckEmailAdress(strEMailAddress As String) As Boolean

Dim bolCorrect As Boolean 'Variable:
Dim strValidChars As String 'Variable: allowed ...

Hallo d'r Bastler...

JA! der Ton war schon manchmal rüde... Jedoch habe ich die lakonischen Hinweise, ich sehe nicht auf dienen PC etc. eher "spaßig" empfunden.
Richtig, der Umgangston war auch manchmal überheblich. Es sind - so war mein empfinden - gegen Ende des Forums auch immer mehr ähnliche ...

Hallo d'r Bastler,

danke für deine Antwort

also aus dem "angeblich" wird ein "Ist".....

-> ich persönlich bin jedoch davon überzeugt, dass sich - per se - E-Autos nicht durchsetzen werden.

Warum nun bei mir E-Auto?
Bei uns im Schnitzelland ist der ösische Finanzminister der Meinung mich als ...

edit: tippfehler
Hallöchen!

Kurze und knappe Überprüfung ob ein bestimmter Namensbereich existiert.
Lässt sich - vermutlich - verbessern....


Public Function NamedRangeExists(strRangeName As String) As Boolean
'catch Error
On Error Resume Next

NamedRangeExists = ThisWorkbook.Names ...

edit: tippfehler
Hallöchen,


hier eine kleine Funktion um - mit CodeName - den Arbeitsblattname (Sheets.Name) zu erhalten.
Könnte noch um ein Errorhandling erweitert werden
Das bringt mich zum nächsten Thema, wie man ein "globales Errorhandling (try, catch) einführt) -> wenn das nicht schon ...

Hallo d'r Bastler

Der Vorteil liegt mit der Intellisense beim Coden und ist der Code meines Erachtens auch lesbarer
Folgend ein paar Spielereien



Option Explicit

Enum ePopulation
[_First]
epNone = 0
epGhana = 30.79
epMali = 19.55
epBenin = 12.1
[_Last]
End Enum

Enum eCountry
[_First ...

Hallöchen,

dann nehme ich dir ein wenig die Furcht...

2 Anwendungsbeispiele:

1. "zentrales" Festlegen der Schriftgrößen


Enum eFontSize
efXXL = 24
efXL = 18
efL = 16
efM = 12
efS = 10
efXS = 8
End Enum
Sub SetFontSize()
ActiveCell.Font.Size = eFontSize.efM
End Sub


2. "zentrales ...