
31-05-13, 00:06
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 22-11-2011 Περιοχή: Αθήνα
Μηνύματα: 2.321
| |
Βλέποντας το ζητούμενο του Χρήστου και πάλι
<<Μάλλον θα έβρισκα βολικό να μην με αφήνει να κάνω κλικ πουθενά αλλού, βγάζοντας προειδοποιητικό μήνυμα για πληκτρολόγηση.>>
Θα έβαζα αυτό τον κώδικα με ένα μήνυμα σε Data Validation στο κελί Κώδικας: Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("xrange").Value <> "" Then
Exit Sub
Else
Range("xrange").Select
End If
End Sub
|