| Excel - Ερωτήσεις / Απαντήσεις Ότι έχει σχέση με συναρτήσεις, μορφοποίηση, εκτυπώσεις γραφήματα κτλ. |
| | Εργαλεία Θεμάτων | Τρόποι εμφάνισης |
|
#7
| |||
| |||
|
Καλησπέρα Σπύρο Πολύ ενδιαφέρουσα η πρόταση σου και ίσως να την χρησιμοποιήσω. ![]() Αλλά μην ξεχνάς είμαι αρχάριος. Με την βοήθεια του Τάσου και κόβοντας από των κώδικα τα περιττά των έφτασα να κάνη την πρώτη εγγραφή. Τι λες πρέπει να τα παρατήσω τελικά……! ![]() Υ.Σ Επίσης δεν γνωρίζω αγγλικά και για αυτό πιστεύω πως μου είναι δύσκολο να κατανοήσω των κώδικα. ![]() Καλή Αναστάση Sub UpdateValues() Dim c As Range, xID As Long, xRow As Long If Range("IsNewEntry") Then xID = Range("newID") xRow = Range("newrow") End If With katanomi If Range("IsNewEntry") Then Range("IsNewEntry") = True .Cells(xRow, 1).Value = xID For Each c In Range("z1z") If IsNumeric(c) And c > 2 Then .Cells(xRow, c).Value = c.Offset(1, 0).Value End If Next ThisWorkbook.Names.Add "monthlist", .Range("b5:b" & Range("NewRow") - 1) .Cells(xRow, 2).Value = .Cells(xRow, 3).Value & "-" & .Cells(xRow, 4).Value Range("IsNewEntry") = True End With End Sub |
« Προηγούμενο Θέμα
|
Επόμενο Θέμα »
| |
| ||||
| Θέμα | Δημιουργός | Forum | Απαντήσεις | Τελευταίο Μήνυμα |
| [Συναρτήσεις] Μεταφορά σε στήλη | vasi | Excel - Ερωτήσεις / Απαντήσεις | 2 | 09-09-12 11:15 |
| [Συναρτήσεις] Αναζήτηση αριθμού σε στήλη | alterna | Excel - Ερωτήσεις / Απαντήσεις | 1 | 10-01-12 10:41 |
| [Excel07] Κουμπί αναζήτησης σε στήλη | sakplak | Excel - Ερωτήσεις / Απαντήσεις | 16 | 16-09-11 23:33 |
| Εμφάνιση τιμών σε μια στήλη | synti | Access - Ερωτήσεις / Απαντήσεις | 4 | 01-04-11 00:11 |
| [Συναρτήσεις] Ταξινομιμένη στήλη | Stratos | Excel - Ερωτήσεις / Απαντήσεις | 2 | 10-08-10 07:49 |
Η ώρα είναι 02:52.






Θεματικός Τρόπος
