31-01-18, 16:34
|
| Όνομα: Γιώργος Έκδοση λογισμικού Office: Ms-Office 2010 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 18-06-2010
Μηνύματα: 3.674
| |
Καλησπέρα
Λάμπρο, είναι δύσκολο να ακολουθήσει και να δοκιμάσει κάποιος το λαβύρινθο που ανέβασες.
Πάντως στην τελευταία γραμμή, θα πρέπει να αντικαταστήσεις το [[A5a] με το [A5a].
Πιο βολική θεωρώ στην περίπτωσή σου τη συνάρτηση Switch. Κώδικας: R2: Switch([DA5a]<0 And [DA5b]<0 And [ΔιαφΑ6Δ]<0;[ΑυτΥπολ_Δ_Δοσ]+[ΑυτΥπΑ5a]+[ΑυτΥπΑ5b]+[ΑυτΥπολΕντΑ6_Δ_Δοσ]+[A5a]+[A5b]+[ΕντυποΑ6_Δ_Δοσ]+[DA5a]+[DA5b]+[ΔιαφΑ6Δ];
[DA5a]<0 And [DA5b]<0;[ΑυτΥπολ_Δ_Δοσ]+[ΑυτΥπΑ5a]+[ΑυτΥπΑ5b]+[ΑυτΥπολΕντΑ6_Δ_Δοσ]+[A5a]+[A5b]+[ΕντυποΑ6_Δ_Δοσ]+[DA5a]+[DA5b];
[DA5a]<0 And [ΔιαφΑ6Δ]<0;[ΑυτΥπολ_Δ_Δοσ]+[ΑυτΥπΑ5a]+[ΑυτΥπΑ5b]+[ΑυτΥπολΕντΑ6_Δ_Δοσ]+[A5a]+[A5b]+[ΕντυποΑ6_Δ_Δοσ]+[DA5a]+[ΔιαφΑ6Δ];
[DA5b]<0 And [ΔιαφΑ6Δ]<0;[ΑυτΥπολ_Δ_Δοσ]+[ΑυτΥπΑ5a]+[ΑυτΥπΑ5b]+[ΑυτΥπολΕντΑ6_Δ_Δοσ]+[A5a]+[A5b]+[ΕντυποΑ6_Δ_Δοσ]+[DA5b]+[ΔιαφΑ6Δ];
[DA5a]<0;[ΑυτΥπολ_Δ_Δοσ]+[ΑυτΥπΑ5a]+[ΑυτΥπΑ5b]+[ΑυτΥπολΕντΑ6_Δ_Δοσ]+[A5a]+[A5b]+[ΕντυποΑ6_Δ_Δοσ]+[DA5a];
[DA5b]<0;[ΑυτΥπολ_Δ_Δοσ]+[ΑυτΥπΑ5a]+[ΑυτΥπΑ5b]+[ΑυτΥπολΕντΑ6_Δ_Δοσ]+[A5a]+[A5b]+[ΕντυποΑ6_Δ_Δοσ]+[DA5b];
[ΔιαφΑ6Δ]<0;[ΑυτΥπολ_Δ_Δοσ]+[ΑυτΥπΑ5a]+[ΑυτΥπΑ5b]+[ΑυτΥπολΕντΑ6_Δ_Δοσ]+[A5a]+[A5b]+[ΕντυποΑ6_Δ_Δοσ]+[ΔιαφΑ6Δ];
True;[ΑυτΥπολ_Δ_Δοσ]+[ΑυτΥπΑ5a]+[ΑυτΥπΑ5b]+[ΑυτΥπολΕντΑ6_Δ_Δοσ]+[A5a]+[A5b]+[ΕντυποΑ6_Δ_Δοσ])
 |