Ανανέωση ιστοσελίδας

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 21-09-20, 10:58
Όνομα: ΕΞΑΡΧΟΣ
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 15-02-2020
Μηνύματα: 104
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από pctechdr Εμφάνιση μηνυμάτων
Gia na katalavo epeidi eimai kai ligo kathysterimenos.

Exeis ena pedio ora_diekp1 pou theleis na pernei timi otan to pedio epivivasi_ploigou einai adeio sosta??

Poia timi tha pernei to pedio ora_diekp1 otan to pedio epivivasi_ploigou einai adeio? Ksekatharise to mou auto na sou apantiso
φίλε μου δεν είσαι εσυ ο καθυστερημένος, εγώ εχω πρόβλημα επικοινωνιας. δεν το εξηγω σωστά και εχεις δίκιο να μην καταλαβαίνεις.
λοιπον. έχω τα πεδία "epivivasi_ploiogu", "ora_diekp1" kai "pedio2"
οταν το πεδιο "epivivasi_ploigou" δεν εχει τιμη τοτε το πεδιο "ora_die θέλω να τιμή του "πεδιο2"
το πεδιο 2 δεν ειναι ποτέ null. έχει πάντα μια τιμη και ειναι κρυφό. δλδ δεν φαινεται στην αναφορά.
και πάλι ευχαριστώ πολύ
Απάντηση με παράθεση
  #2  
Παλιά 21-09-20, 13:43
Το avatar του χρήστη Tasos
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 2.037
Προεπιλογή

Παρακαλώ μην γράφετε Greeklish!!!

Μας βγάλατε τα μάτια!

Σε κάθε παράθυρο επεξεργασίας μηνύματος προσφέρεται ένας σύνδεσμος όπου μπορεί κανείς να διορθώσει τα Greeklish σε ελληνικά.

Ο σύνδεσμος:

Greeklish2Greek Converter
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών
Απάντηση με παράθεση
  #3  
Παλιά 21-09-20, 13:51
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Αγγλική
 
Εγγραφή: 18-11-2012
Περιοχή: Deutschland
Μηνύματα: 212
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από Tasos Εμφάνιση μηνυμάτων
Παρακαλώ μην γράφετε Greeklish!!!

Σε κάθε παράθυρο επεξεργασίας μηνύματος προσφέρεται ένας σύνδεσμος όπου μπορεί κανείς να διορθώσει τα Greeklish σε ελληνικά.

Ο σύνδεσμος:

Greeklish2Greek Converter
Δεν το γνωριζα αυτο ευχαριστω
Απάντηση με παράθεση
  #4  
Παλιά 21-09-20, 13:53
Το avatar του χρήστη Tasos
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 2.037
Προεπιλογή

Όλα καλά Χρήστο μου!
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών
Απάντηση με παράθεση
  #5  
Παλιά 21-09-20, 10:42
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Αγγλική
 
Εγγραφή: 18-11-2012
Περιοχή: Deutschland
Μηνύματα: 212
Προεπιλογή

kati tetoio ennoeis??
If IsBlank([epivivasi_ploigou]) Or IsBlank([ora_klisis_kitrini]) Then
[ora_diekp1] = [epivivasi_ploigou] & [ora_klisis_kitrini]
Απάντηση με παράθεση
  #6  
Παλιά 21-09-20, 11:15
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Αγγλική
 
Εγγραφή: 18-11-2012
Περιοχή: Deutschland
Μηνύματα: 212
Προεπιλογή

Mporeis na grapseis px sto report current to eksis.

If IsBlank([epivivasi_ploigou]) then [ora_die]=[πεδιο2]
Απάντηση με παράθεση
  #7  
Παλιά 21-09-20, 11:32
Όνομα: ΕΞΑΡΧΟΣ
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 15-02-2020
Μηνύματα: 104
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από pctechdr Εμφάνιση μηνυμάτων
Mporeis na grapseis px sto report current to eksis.

If IsBlank([epivivasi_ploigou]) then [ora_die]=[πεδιο2]

το έκανα If IsBlank([epivivasi_ploigou]) Then [ora_diekp1] = [pedio2]
αλλα δεν παιζει.
το πεδιο [ora_diekp1] παιιρνει την τιμη του "pedio2" ειτε το "epivivasi_ploiogu" ειναι blank ειτε δεν ειναι
Απάντηση με παράθεση
  #8  
Παλιά 21-09-20, 11:34
Όνομα: ΕΞΑΡΧΟΣ
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 15-02-2020
Μηνύματα: 104
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από pctechdr Εμφάνιση μηνυμάτων
Mporeis na grapseis px sto report current to eksis.

If IsBlank([epivivasi_ploigou]) then [ora_die]=[πεδιο2]
το module δεν εχω δοκιμασει ακομα αλλα δεν το καταλαβα καλα. πως και πότε να το καλώ
σ ευχαριστω πολύ παντως για το χρόνο που διαθετεις.
με εκτιμηση
Απάντηση με παράθεση
  #9  
Παλιά 21-09-20, 11:52
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Αγγλική
 
Εγγραφή: 18-11-2012
Περιοχή: Deutschland
Μηνύματα: 212
Προεπιλογή

Aderfe xoris to module auto pou egrapses DEN paizei. Xreiazesai tin synartisi pou sou edosa oposdipote.

Bima 1: Dimiourgeis neo module i antigrafeis ton kodika poy soy edosa se ena yparxon.
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
Bima 2: Stis idiotites tou report - Events - OnCurrent grafeis auto If IsBlank([epivivasi_ploigou]) Then [ora_diekp1] = [pedio2]
Telos
Απάντηση με παράθεση
  #10  
Παλιά 21-09-20, 12:49
Όνομα: ΕΞΑΡΧΟΣ
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 15-02-2020
Μηνύματα: 104
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από pctechdr Εμφάνιση μηνυμάτων
Aderfe xoris to module auto pou egrapses DEN paizei. Xreiazesai tin synartisi pou sou edosa oposdipote.

Bima 1: Dimiourgeis neo module i antigrafeis ton kodika poy soy edosa se ena yparxon.
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
Bima 2: Stis idiotites tou report - Events - OnCurrent grafeis auto If IsBlank([epivivasi_ploigou]) Then [ora_diekp1] = [pedio2]
Telos
φίλε μου σ ευχαριστώ πάρα πολύ για τη βοήθεια και συγνώμη που δεν τα πίανω με τη μία
loipo;n έκανα ότι ακριβως περιέγραψες αλλα μολισ κανω κλικ στη report βγαζει bug "expected variable or procedure,not module"
Απάντηση με παράθεση
Απάντηση στο θέμα

Εργαλεία Θεμάτων
Τρόποι εμφάνισης

Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
Report πρόβλημα mikekal1oo Access - Ερωτήσεις / Απαντήσεις 7 04-04-16 19:13
Report σε Pdf ΚΩΣΤΑΣ2 Access - Ερωτήσεις / Απαντήσεις 0 16-07-14 21:18
Τίτλος report page gipsy Access - Ερωτήσεις / Απαντήσεις 6 17-05-12 12:00
[ Εκθέσεις ] Πονοκέφαλος σε Report marios1984 Access - Ερωτήσεις / Απαντήσεις 2 29-03-10 11:19
Πλέγματα στα Report Meteora Access - Ερωτήσεις / Απαντήσεις 1 07-07-09 13:05


Η ώρα είναι 16:08.