2017-04-12 5 views
-2

Ich bin neu in VBA, ich versuche, ein Makro zu machen, die eine Nachricht an den Benutzer zeigen, wenn er vergessen hat, einen Fall zu füllen. alle Kommentare sind willkommen,Anzeige der Nachricht für Benutzer VBA Excel

+3

Sehr geehrte POLOS, Sie sollten beschreiben, was Sie in mehr Details wollen. Bitte geben Sie den Code an, den Sie bereits entwickelt haben, damit wir analysieren und versuchen können, Ihnen zu helfen. – Felipe

+2

Warum verwenden Sie nicht einfach die bedingte Formatierung, um die Zelle (n) gelb hervorzuheben, wenn sie leer sind? – tigeravatar

Antwort

2

UGH du hast nicht einmal versucht, das absolute Minimum zu versuchen, hast du?

Sie wissen, dass Sie alle diese Sachen in den ersten paar Seiten von jedem Tutorial richtig lernen?

denke ich krank Hilfe obwohl

If ThisWorkbook.Sheets("Sheet1").Range("A1").Value = "" Then 
     MsgBox("You Cannot leave this cell empty") 
End if 

Hier einige gute Tutorials sind. Bitte machen Sie das Minimum des Selbstunterrichts und achten Sie darauf, zu Stack Overflow mit spezifischen Coding Fragen zu kommen.

https://www.tutorialspoint.com/vba/

http://www.excelfunctions.net/Excel-VBA-Tutorial.html

http://www.excel-easy.com/vba.html

nahm diese mir weniger Zeit, um Ihre Post zu finden, als prolly und sprach nur zu schreiben, nahm.

+0

@Doug Coats Entschuldigung ich tue mein Bestes hier arbeite ich für eine Firma, die jeden Tag etwas von mir wollen, so bin ich auf der Suche nach schnellen Antworten –

+0

LOL naw ließ ihn dabei haben. Außerdem sind meine Posts voll SO Material, es sei denn ich gebe @Mat'sMug etwas zu tun: D –

+2

@POLOSTutorials gut Kumpel hasse es dir zu sagen, dass ich wahrscheinlich die einzige Person hier bin, die sogar grundlegende Hand halten wird, und sogar ich habe meine Grenzen. Schau dir die Tutorials an, auf die ich dich hingewiesen habe, es sollte erheblich helfen. –

0

Hier können Sie mit anderen Idee gehen:

Option Explicit 

Private Sub Worksheet_Deactivate() 

    If Trim(Cells(1, 1)) = "" Then 

     MsgBox "Do not leave" 
     Sheets(1).Select 
     Cells(1, 1).Select 

    End If 

End Sub 

Wenn Sie diesen Code in das Arbeitsblatt setzen, nicht in einem Modul, dass es funktionieren würde. Stellen Sie sicher, dass Sie es auf der ersten Arbeitsmappe, nicht in einem Modul. Beispiel hier:

enter image description here

Je nachdem, was genau tun Sie, können Sie auch ähnliche Verfahren in einem Arbeitsblatt (Thisworkbook auf das Bild oben) setzen und verwenden Sie das Workbook_BeforeClose Ereignis, Benutzer verbieten zu lassen.

+0

, @ Doug Es zeigt Do not Leave immer, aber es zeigt nicht, wo ich füllen soll Was ich genau will (ich habe eine Tabelle mit Informationen, die durch die gefüllt werden sollen Benutzer und er sollte jeden einzelnen Fall ausfüllen), so muss ich eine Nachricht für ihn anzeigen, wenn er vergessen hat, etwas zu füllen –

+0

Siehe die Bearbeitung, jetzt sollte die Zelle ausgewählt werden. – Vityata

+0

Es ist ein gefülltes Fall der Auswahl: "(Code Private Sub Worksheet_Deactivate() Wenn Trim (Cells (1, 460)) = "" Then MsgBox "Lassen Sie keine" Sheets ("Feuil1") auswählen. Cells (1, 460) .Select End If End Sub –

Verwandte Themen