ZELDA

Καλησπέρα στους εξωτερικούς τοίχους του σπιτιού μου έχουν δημιουργηθεί σε κάποια σημεία τριχοιδη ρωγμές στο σοβά, σκέφτηκα να το επισκευάσω κάνοντας διάνοιξη των ρωγμών με κάποιο γωνιακό τροχό και μετά με κάποιο επισκευαστικο υλικό που πρέπει να μου προτείνει κάποιος να το στοκαρω , το πρόβλημα είναι ότι δεν ξέρω αν πρέπει να χρησιμοποιήσω κάποιο ειδικό αστάρι και αν πρεπει να βάλω κάποιο ειδικό επισκευαστικο υλικό ή να φτιάξω παραδοσιακό σοβά, επισης θα ήθελα να ξέρω πόσο πάχος έχει ο σοβάς διότι το σπίτι έχει εξωτερική θερμομόνωση 10 πόντων. Κάποιες φωτογραφιες που τράβηξα

Καλησπέρα εχω κάνει μια προώθηση δημοσίευσης στην επαγγελματική μου σελίδα αξίας 50 € όμως για καποιο λόγο θέλω να κρατήσω την εκστρατία αλλα να αλλαξω την δημοσίευση και την φωτογραφία ΄όμως δεν γίνεται αυτό . Θέλω να μάθω γιατί δεν εχω βρεί κατι ρε παιδιά , αν σε περίπτωση ακυρώσω την προώθηση π.χ απομένουν 30 μερες προώθησης ακόμη απο τις 35 πχ μέρες θα χάσω όλο το ποσό που έχω βάλει για την εξτρατία η θα μου χρεώσει στην καρτα μονο για τις 5 μέρες που έτρεξε η προώθηση ?

Καλησπέρα θέλω να ρωτήσω γιατί κολλάει η πίτσα στο φτυάρι ρε παιδιά και πόσα γραμμαρια κάνετε εσείς το μπαλακι?

Καλημέρα αντιμετωπίζει καποιος προβληματα με cosmote σημερα?

ρε φίλε αλήθεια τώρα.. Εχεις ενα ψυγείο που παιζει να εχει διαρροή κατα 99 % και θα πας να βάλεις παραφλου για να το τσεκάρεις? Αλήθεια απαντησε μου επίσης βλέπεις καπου να ρώτησα τι υγρό να επιλέξω ή αν είναι καλύτερο απιονισμενο , απεσταγμένο , παραφλού ή σκετο νερό ?

Σιγά ρε έξυπνε, το γεμισα για να το παρακολουθησω προφανώς ..

Καλησπέρα, έχει η κοπέλα μου ένα φιατ αυτό το 500αρακι του 2007 . προχθές μου παραπονέθηκε ότι δεν βγάζει ζεστό αέρα το a/c και σε έλεγχο που έκανα βρήκα ότι έλειπαν νερά από το ψυγείο περίπου 2000 - 2200 ml περίπου , εφοσον γέμισα το ψυγείο νερό το a/c τώρα δουλεύει κανονικά... Ερώτηση1 : τι σχέση έχει το ψυγείο με το κλιματιστικό ? Ερώτηση 2 : Πόσα λίτρα έχει χωρητικότητα το ψυγείο απο το 500αρακι γνωρίζει κανεις? Επισης τα 2,2 λίτρα που έλειπαν ηταν αρκετα ωστε να έπαθε ζημιά η φλατζα ή παιρνει αρκετό νερό το ψυγείο και την γλύτωσε? Από ότι μου είπε τις τσέκαραν τα υγρά σε κάποιο βενζινάδικο πριν κανένα χρόνο χοντρικά .. Αλλά όλο αυτό το διάστημα δεν ανέβηκε η ποτε η θερμοκρασία πάνω από τα φυσιολογικά επίπεδα. Υπ Τώρα το έχω γεμίσει νερό μέχρι επάνω φουλ για να τσεκάρω αν χάνει από καποιο κολάρο.

λιγο με την βοηθεια του gpt, αν και το πρόβλημα με το πρώτο πεδίο δεν μπορώ να το λύσω .. Sub Store_Data() ' TeachExcel.com ' Takes data from one worksheet and stores it in the next empty row on another worksheet. Dim sourceSheet As Worksheet Dim dataSheet As Worksheet Dim nextRow As Long Dim inputRange As Range Dim cellOffset As Integer ' Make some sheet variables so we can use those instead of hard-coding sheet references in the code. Set sourceSheet = Sheets("Input") Set dataSheet = Sheets("Data") ' Define the range on the source sheet to loop through Set inputRange = sourceSheet.Range("J4, J8, J12, J16, J20, J24, J28, J32") ' Get the next empty row from the Data sheet. nextRow = dataSheet.Range("A" & dataSheet.Rows.Count).End(xlUp).Offset(1).Row ' Input the form values into the Data sheet using a For loop For Each cell In inputRange cellOffset = (cell.Row - 4) / 4 ' Calculate the offset based on the starting row and step dataSheet.Cells(nextRow, cellOffset + 1).Value = cell.Value Next cell ' Clear Data using a For loop For Each cell In inputRange cell.Value = "" Next cell End Sub

Καθε μερα θα βαζει καποιος χρήστης τιμες σε αυτα τα πεδία τα οποία ειναι 8, αν για καποιο λόγο κάνει καποιο λαθος στην καταχώρηση θέλω να σβήσει μονο τα πεδία εκείνης της μέρας και οχι τα 8 τελευταία , εδώ ναι εχουμε πρόβλημα αλλα δεν φαίνεται να δουλευει με αυτο τον τρόπο εννοω μου σβήνει την τελευταία σειρα ετσι οπως , δηλαδή σταματάει στο πρώτο πεδίο εισαγωγής θέλω δηλαδή ωστε να ξανα ξεκινησει να εισάγει δεδομενα ο χρήστης αποτην αρχή

Δεν μπορώ να το εξηγήσω, βλέπεις κάτι λάθος γενικα?

Εχω δημιουργήσει μια φόρμα καταχώρησης για τους εργαζόμενους για να καταχωρούν καποιες πωλήσεις που χρειάζομαι , βάζω τις τιμες στα καταλληλα πεδία στο Input , παταω save και οι καταχωρήσεις αποθηκεύονται κανονικά στο φυλλο Data σε 8 διαφορετικά πεδία , μεχρι εδώ μια χαρά ... Το πρόβλημα που αντιμετωπίσω είναι το εξής: Aν στο input βαλω τιμές στα πεδία 2-3-4-5-6-7-8 τότε η φόρμα λειτουργεί κανονικά εννοώ οτι δουλευει το κουμπι διαγραφής τελευταίας καταχώρησης. Εαν τώρα βάλω τιμή και στο πεδίο 1 τότε δεν δουλευει .. module 1 Sub Store_Data() ' TeachExcel.com ' Takes data from one worksheet and stores it in the next empty row on another worksheet. Dim sourceSheet As Worksheet Dim dataSheet As Worksheet Dim nextRow As Long ' Make some sheet variables so we can use those instead of hard-coding sheet references in the code. Set sourceSheet = Sheets("Input") Set dataSheet = Sheets("Data") ' Get the next empty row from the Data sheet. nextRow = dataSheet.Range("A" & dataSheet.Rows.Count).End(xlUp).Offset(1).Row ' Input the form values into the Data sheet. dataSheet.Cells(nextRow, 1).Value = sourceSheet.Range("j4").Value dataSheet.Cells(nextRow, 2).Value = sourceSheet.Range("j8").Value dataSheet.Cells(nextRow, 3).Value = sourceSheet.Range("j12").Value dataSheet.Cells(nextRow, 4).Value = sourceSheet.Range("j16").Value dataSheet.Cells(nextRow, 5).Value = sourceSheet.Range("j20").Value dataSheet.Cells(nextRow, 6).Value = sourceSheet.Range("j24").Value dataSheet.Cells(nextRow, 7).Value = sourceSheet.Range("j28").Value dataSheet.Cells(nextRow, 8).Value = sourceSheet.Range("j32").Value ' Clear Data sourceSheet.Range("j4").Value = "" sourceSheet.Range("j8").Value = "" sourceSheet.Range("j12").Value = "" sourceSheet.Range("j16").Value = "" sourceSheet.Range("j20").Value = "" sourceSheet.Range("j24").Value = "" sourceSheet.Range("j28").Value = "" sourceSheet.Range("j32").Value = "" End Sub module 2 για την διαγραφή τελευταιας καταχώρησης Sub DeleteLast8Rows() Dim ws As Worksheet Dim lastRow As Long ' Ορίζουμε το φύλλο εργασίας (Worksheet) Set ws = ThisWorkbook.Sheets("Data") ' Αντικαταστήστε το "Data" με το όνομα του φύλλου εργασίας ' Βρίσκουμε την τελευταία γραμμή με δεδομένα lastRow = ws.Cells(ws.Rows.Count, "2").End(xlUp).Row ' Ελέγχουμε αν υπάρχουν τουλάχιστον 8 γραμμές If lastRow >= 8 Then ' Διαγράφουμε τις τελευταίες 8 γραμμές ws.Rows(lastRow - 7 & ":" & lastRow).Delete Else ' Αν δεν υπάρχουν τουλάχιστον 8 γραμμές, διαγράφουμε όλες ws.Rows("1:" & lastRow).Delete End If End Sub παραθέτω και το αρχείο για οποιον θελει να βοηθήσει . Φορμα καταχώρησης ins.xlsm

sold λυθηκε συναρτηση find .

καλησπέρα και καλή χρονιά σε όλους, προσπαθώ να βρω ολες τις ημερομηνιες παράδειγμα 6/1 ανεξαρτήτου έτους σε ενα υπολογιστικό φύλλο πωλήσεων , εχω προσπαθήσει με εύρεση & αντικατασταση αλλα δεν μου δίνει σωστα αποτελέσματα υπάρχει καποιος αλλος τρόπος ?

Τα νοσηλεια δεν είναι τόσο ακριβά στις ιδιωτικές κατά την γνώμη μου η πρώτη μέρα στον Άγιο Λούκα με το χειρουργείο κοστίσε 800 ευρώ για ενδομητριωση που έκανε η κοπέλα μου, η κάθε ημέρα επιπλέον κόστιζε 175 ευρώ το δίκλινο και 350 το μονόκλινο, άρα όσοι σπεύσουν να κάνουν ιδιωτικημονο για την διαμονή να το ψάξουν περισσότερο.

Φιλε μου αξίζει το 12αρι? Μέχρι τι διαφορά ετρο πιτσα μπορείς να ανοίξεις θέλω ένα ooni αλλά δεν θέλω να ξεφύγω από 350 400€..