Thema Datum  Von Nutzer Rating
Antwort
20.07.2017 14:20:52 Lucas
NotSolved
Blau Default Wert für Zelle
20.07.2017 17:47:45 Werner
NotSolved
21.07.2017 09:00:49 Gast36348
NotSolved
21.07.2017 09:35:32 Werner
NotSolved
21.07.2017 16:23:02 Lucas
NotSolved
21.07.2017 20:18:16 Werner
NotSolved

Ansicht des Beitrags:
Von:
Werner
Datum:
20.07.2017 17:47:45
Views:
644
Rating: Antwort:
  Ja
Thema:
Default Wert für Zelle

Hallo Lucas,

hier mal ein kleines Beispiel. Die Default-Werte müssen in C13 bis N13 stehen.

Der Code muss ins Codemodul des Arbeitsblattes, auf dem er sich auswirken soll.

-Rechtsklick auf den Tabellenblattreiter - Code anzeigen - Code rechts ins Codefenster kopieren

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 4 Then Exit Sub
If Target.Column >= 3 And Target.Column <= 14 Then
    If Target.Count > 1 Then
        MsgBox "Mehrfachauswahlt ist nicht zulässig."
        Application.EnableEvents = False
        Application.Undo
        Application.EnableEvents = True
        Exit Sub
    End If
    If Target.Value = "" Then
        Target.Value = Target.Offset(9, 0).Value
    End If
End If
End Sub

 

Zu der Geschichte mit den DropDown Feldern kann ich nichts sagen (geschweige denn Code liefern), da die Infos dazu nicht ausreichend sind bzw. gar nicht vorhanden sind.

 

Gruß Werner


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
20.07.2017 14:20:52 Lucas
NotSolved
Blau Default Wert für Zelle
20.07.2017 17:47:45 Werner
NotSolved
21.07.2017 09:00:49 Gast36348
NotSolved
21.07.2017 09:35:32 Werner
NotSolved
21.07.2017 16:23:02 Lucas
NotSolved
21.07.2017 20:18:16 Werner
NotSolved