2016-06-01 11 views
0

Ich erstelle ein kleines Abrechnungssystem in Excel für eine Zahnarztpraxis (Erwähnen Sie es nur, falls jemand irgendwelche Tipps/Tricks/Vorschläge zu coolen Ideen hat, die nicht wirklich mit dem Problem zu tun haben). Ich habe eine kleine Vorlage zum Erstellen von Rechnungen in einer der Zellen Ich habe eine Datenvalidierung für die Auswahl des Patienten, ich fragte mich, ob in der Liste der Name ausgewählt ist "Neuer Patient" ein UserForm kann auftauchen, um die neuen Patienteninformationen einzugeben?Kann ein Zellenwert ein Benutzerformular auslösen?

+0

See [Worksheet_Change] (https://msdn.microsoft.com/en-us/library/office/ff839775.aspx) einstellen Ereignismakro. – Jeeped

Antwort

1

ZB: das in dem Arbeitsblatt-Modul setzen und Referenzen als geeignete

Private Sub Worksheet_Change(ByVal Target As Range) 

    Const NEW_PAT As String = "New Patient" 
    Const RNG_NEW_PAT As String = "B3" 
    Dim c As Range 
    Set c = Target.Cells(1) 'in case multiple cells changed... 

    If c.Address = Me.Range(RNG_NEW_PAT).Address Then 
     If c.Value = NEW_PAT Then 
      'show userform 
     End If 
    End If 


End Sub 
+0

Wenn ich das Benutzerformular in einer anderen Arbeitsmappe habe, kann es aufgerufen werden? Ich habe in einem anderen Arbeitsbuch eine Benutzerform, um die neuen Patienten zu registrieren. Jetzt fragen Sie sich vielleicht, ob diese Arbeitsmappe existiert, warum Sie sie in der Arbeitsmappe für die Rechnungsstellung angeben wollen, falls jemand gerade für einen Notfall schnell reinkommt und keine Zeit hat, ihn zu füllen. Idealerweise in solchen Situationen würde es passieren, dass ich das Abrechnungssystem öffne, das Patientenregistrierungsformular neu auswählen würde und die Informationen in dem Patientenregistrierungsformular speichern würde, und dann kann ich zurück zur Abrechnung gehen und den Patienten auswählen. –

+0

http://www.vbaexpress.com/forum/archive/index.php/t-9898.html –

Verwandte Themen