Thema Datum  Von Nutzer Rating
Antwort
11.08.2017 09:34:22 Ellen
NotSolved
11.08.2017 10:14:54 Gast70117
Solved
11.08.2017 10:44:34 Ellen
NotSolved
11.08.2017 11:46:57 Gast35076
NotSolved
Rot und
 11.08.2017 12:26:40 Gast1401
Solved
11.08.2017 13:02:19 Ellen
NotSolved
15.08.2017 16:15:46 Feng Bo
NotSolved

Ansicht des Beitrags:
Von:
Gast1401		 Datum:
11.08.2017 12:26:40		 Views:
657		 Rating:
     
Antwort:
 Nein
Thema:
und

[Ich habe vorher das immer über Daten - Datenüberprüfung gemacht, aber möchte mir den Weg über einen extra Verweis auf Auswahlwerte sparen, da immer nur wenige, fixe Werte zur Auswahl stehen].

Back To The Roots

Option Explicit

Sub ArrayValidation()
'Datenüberprüfung
'Zelle wo und Liste was
Dim vArr As Variant: vArr = Array("Opa1", "Oma", "Enkel")
MkbyArray "D4", vArr
End Sub

Private Sub MkbyArray(myAddi As String, myArr As Variant)
With ActiveSheet.Range(myAddi).Validation
    .Delete
    .Add Type:=xlValidateList, Formula1:=Join(myArr, ",")
    .IgnoreBlank = True
    .InCellDropdown = True
    .InputTitle = ""
    .ErrorTitle = ""
    .InputMessage = ""
    .ErrorMessage = ""
    .ShowInput = True
    .ShowError = True
End With
End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
11.08.2017 09:34:22 Ellen
NotSolved
11.08.2017 10:14:54 Gast70117
Solved
11.08.2017 10:44:34 Ellen
NotSolved
11.08.2017 11:46:57 Gast35076
NotSolved
Rot und
 11.08.2017 12:26:40 Gast1401
Solved
11.08.2017 13:02:19 Ellen
NotSolved
15.08.2017 16:15:46 Feng Bo
NotSolved