-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
[w]
őstag
ok, rájöttem mi volt a gond, de most egy másik adódott...
a B-C oszlop dátumai ugyanis úgy keletkeznek, hogy máshonnan a 2017.01.01-2017.01.31 formában beírt időszakot BAL és JOBB függvénnyel bontom kezdete és végére, de így nem dátumként érzékeli
ha a bontott értékek szerkesztésekor az érték végén nyomok egy del-t és utána enter, akkor azonnal dátumformátumra állítja és a MIN-MAX képletek is jól lefutnakcsakhogy 6000 soron nem tudom ezt az értékkorrekciót végigcsinálni kézzel
[ Szerkesztve ]
cmdr PETER W. VOLKOV
-
[w]
őstag
segítséget szeretnék kérni annak megoldásához, hogy szűrő használata esetén ne szűrje ki a tábla legalján található összesen sort is
nem tudom mi okozza, de van erre megoldás?
cmdr PETER W. VOLKOV
-
[w]
őstag
olyat lehet csinálni, hogy ha sok (több száz) munkafüzetben kitöltetlen maradt ugyanaz az 1 cella (pl. végéről a készítő neve), akkor azt valamiféle automatizálással kitölteni, majd elmenteni, bezárni és jöhet a következő?
cmdr PETER W. VOLKOV
-
[w]
őstag
válasz Pakliman #46601 üzenetére
köszi, próbálkozom...
mi az ellenőrzendő, a lapfül neve?most így hirtelen "subscript out of range"ok, elírás volt a lapfül nevében...
annyiban bonyolult a helyzet, hogy az egyes munkafüzetek saját, külön könyvtárakban vannak legyűjtve, tehát nem egy mappából kell őket megnyitni (sMappa), hanem rengetegből
ezzel így megoldható?
[ Szerkesztve ]
cmdr PETER W. VOLKOV
-
[w]
őstag
válasz Pakliman #46601 üzenetére
ezt a kódot hogyan lehet tovább bővíteni úgy, hogy:
1. a vizsgálat (IF) után egyszerre több cellára kiterjedően, de más és más tartalmat helyezzen el (tehát pl. egy másik cellában a dátumot is írja be)
2. ne csak üres cella esetén végezze el a kitöltést
cmdr PETER W. VOLKOV
-
[w]
őstag
válasz Delila_1 #46871 üzenetére
rendesen? rendesen az eredeti kódban volt, gondoltam nem terhelem feleslegesen a motort:
Sub xx()
Dim sMappa As String
Dim s As String
Dim wb As Workbook
sMappa = "C:\Dokumentumok\___TEMP\"
s = Dir(sMappa & "*.xls*")
Do While s <> ""
Set wb = Workbooks.Open(sMappa & s)
If IsEmpty(wb.Worksheets("Ellenőrzendő").Range("B25")) Then
wb.Worksheets("Ellenőrzendő").Range("B25") = "Készítő neve"
wb.Save
End If
wb.Close
s = Dir
Loop
End Sub[ Szerkesztve ]
cmdr PETER W. VOLKOV
-
[w]
őstag
válasz Delila_1 #46884 üzenetére
még egy eszembe jutott:
lehet-e a sMappa változónak megadni pl. egy txt állományt, amelynek minden sorában a megnyitandó mappák vannak felsorolva és onnan magától olvassa be azokat? (még 900 mappa, 1900 db táblája áll előttem...)+bónusz: nem újraírni a meglévő cella tartalmát, hanem hozzáfűzni lehet?
[ Szerkesztve ]
cmdr PETER W. VOLKOV
-
[w]
őstag
válasz Delila_1 #46892 üzenetére
nagyszerű, akkor még néhány kérdés:
kell lennie egy útvonalak.txt-nek - ez a "megnyitando.txt"
az utvonal kétszer is van definiálva, ha szándékos, akkor a második miben tér el az elsőtől?
mi az a cserék a B oszlopban? cellára nem lehet megadni?
egy sorszámozást kellene átalakítanom (ez az az egy módosítandó cella), ami elejétől fogva rossz volt és a "cég/sorszám/valami" struktúrát kellene átírni "cég/sorszám/valamimás" kinézetre, tehát igazából a szövegnek csak egy részét kellene cserélni[ Szerkesztve ]
cmdr PETER W. VOLKOV
-
[w]
őstag
válasz Delila_1 #46894 üzenetére
ha félre tudod tenni az eredendő dühödet és türelmetlenségedet, akkor könnyen be fogod látni, hogy nem tudunk egymás fejével gondolkodni, ezért előfordulhatnak félreértések, nem egyedül az egyik fél hibája.
ha most figyelmesen visszaolvasol, akkor látod azt is, hogy sehol nem írtam, hogy növekvő számozásra van szükség. az megvan, nem is kell bántani.
azt írtam "cég/sorszám/valami" van és "cég/sorszám/más"-ra kellene módosítanom.nem értek hozzá, segítségért jöttem ide, tőled ez a sokadik leereszkedő stílusú megnyilvánulás, amire ilyen helyzetben senkinek nincs szüksége.
cmdr PETER W. VOLKOV