Θέμα: report

Εμφάνιση ενός μόνο μηνύματος
  #6  
Παλιά 21-09-20, 10:08
pctechdr Ο χρήστης pctechdr δεν είναι συνδεδεμένος
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Αγγλική
 
Εγγραφή: 18-11-2012
Περιοχή: Deutschland
Μηνύματα: 212
Προεπιλογή

Na protino kai ego kati??

Vale auton ton kodika se ena module

Public Function IsBlank(arg As Variant) As Boolean
Select Case VarType(arg)
Case vbEmpty
IsBlank = True
Case vbNull
IsBlank = True
Case vbString
IsBlank = (LenB(arg) = 0)
Case vbObject
IsBlank = (arg Is Nothing)
Case Else
IsBlank = IsMissing(arg)
End Select
End Function

kai meta grapse If isblank([epivivasi_ploigou]) then tin timi pou theleis.

Sorry gia ta greeklish alla eimai stin douleia kai den exo Elliniki glossa.
Απάντηση με παράθεση