-
IT café
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
-
Mittu88
senior tag
Azt hogy lehet megcsinálni, hogy ha ráállok egy cellára, egy változó eltárolja az értékét, és ha megváltoztatják, egy másik változó eltárolja az új értékét?
A SelectionChange-be meg tudtam oldani, hogy a régit tárolja egy globális változó, a Worksheet_Calculate-be meg az újat akartam, de ha ENTER-rel vagy TAB-bal változtatják meg a cella értékét, akkor annak a cellának az értékét tárolja, amelyikRE ugrott enter-rel vagy tab-bal.
-
Mittu88
senior tag
válasz m.zmrzlina #23433 üzenetére
Köszönöm szépen, Fferi-nek is
Viszont felmerült egy másik probléma:
Van egy ilyen kódom:
Public sor As Integer
...
Private Sub Worksheet_Change(ByVal Target As Range)
sor = Target.Row
...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim nev As String
...
nev = Cells(sor, 1).Value
...És erre azt a hibaüzenetet dobja, hogy Application-defined or object-defined error.
A sor változó értéke 0, tehát nyilván nem tudja a nev változónak egy nem létező cella értékét adni. De mitől 0 a sor értéke?
Próbáltam a sor = ActiveCell.Row parancsot is, de ugyanez van. -
Mittu88
senior tag
válasz Mittu88 #23458 üzenetére
Hátha érdekel másokat is:
Ha a cella képletet tartalmaz ( = jellel kezdődik), enterre a sorrend: Calculate -> Change -> Selectionchange.
Ha csak beírunk valamit, NINCS Calculate.
Ha van érvényesítés és rossz értéket írunk be, annyiszor lefut a Change esemény, ahányszor módosítani akartuk a cella értékét. -
Mittu88
senior tag
válasz Delila_1 #23463 üzenetére
Hogy kell úgy változót deklarálni, hogy mindenhol ugyanaz legyen?
ThisWorkbook-on deklaráltam egy 'valtozotte' nevű boolean változót úgy, hogy Public valtozotte as Boolean, de a Worksheet eseményeinél azt írja, hogy nincs deklarálva <Expression not defined in this context>
Ha nem Public-kal kell, akkor hogy?szerk.: Bocsi, véletlenül a válaszol-ra nyomtam.
[ Szerkesztve ]
-
-
Mittu88
senior tag
Úgy érted több munkalappal van egy táblázatod, és munkalaponként vannak a partnerek?
Ha igen, minden munkalapon ugyanabban a cellában található(ak) ez(ek) az adatok?
Szerk.: mivel külön munkalapon, vagy munkafüzetben vannak az adatok, szerintem egyszerűen nem lehet megoldani (bár ez relatív). Makró kell. Ahhoz értesz picit?
[ Szerkesztve ]
-
Mittu88
senior tag
Azt hogy lehet megcsinálni, hogy Accessbe becsatolva egy xlsx fájlt a számot ne DUPLA típusúnak állítsa be adott oszlopban, hanem HOSSZÚ EGÉSZ-nek?
Sajnos az "Adatforrás csatolása csatolt tábla létrehozásával" menüpontra kell mennem, hogy mindig frissítsen megnyitáskor, de így nem tudom beállítani, hogy melyik oszlopot minek ismerje fel. Utána tervező nézetben meg nem engedi menteni a módosításokat. -
Mittu88
senior tag
válasz m.zmrzlina #23546 üzenetére
Az esetleg nem lenne elegánsabb, ha csinálnál a module-ban egy eljárást, ami csak értéket ad a public változóknak, az eljárást pedig a Workbook_Open eseménynél meghívod?
Ergo fájl megnyitásakor kapna mindegyik public változó értéket és utána már használhatnád. -
Mittu88
senior tag
válasz m.zmrzlina #23552 üzenetére
Modul-on belül deklarálod Sub-on kívül, aztán csinálsz egy Sub-ot, amiben értéket adsz mindegyiknek.
workbook_open-be meg beírod a sub nevét.pl.:
Module-ban:Public pelda as integer
Public peldaketto as stringSub Ertekadas()
pelda = 12345
peldaketto = "egykettoharomnegyot"End Sub
ThisWorkBook-ban meg:
Private Sub Workbook_Open()Ertekadas
End Sub
Bocsi, ha nem elég érthető, szaknyelvben nem vagyok jó (még)
-
Mittu88
senior tag
válasz m.zmrzlina #23554 üzenetére
Az fog is változni, de nem az a problémád, hogy volt, amelyiknek nem volt kezdőértéke még?
-
Mittu88
senior tag
Ha excelben létrehoztam egy active-x nyomógombot, amihez makrót rendeltem, azt ki lehet rakni mondjuk asztalra? Vagy valahogy lehet ikont létrehozni, ami egy adott fájlban makrót futtat?
-
Mittu88
senior tag
Sziasztok!
Makróval hogy lehet megoldani, hogy ha több cellát jelölünk ki, akkor kijelölés után a kijelölt tartomány első cellájára ugorjon a kijelölés egyből. A workbook_selectionchange eseménybe kellene írni valamit, de eddig jutott a tudomány.
-
Mittu88
senior tag
válasz littleNorbi #23833 üzenetére
Module-ba tetted a programkódot?
-
Mittu88
senior tag
válasz littleNorbi #23836 üzenetére
Erre szokta az IT-s kollégám mondani, hogy rendszertelenségre nem lehet rendszert fejleszteni. Amivel részben egyet is értek. Szerintem lehet, csak feleslegesen erőforrás-igényes. Ebbe is bele lehet egyesével programozni, hogy milyen karaktert minek kell követnie, hogy egy adott módon értelmezze a program, de egyszerűbb lett volna úgy bekérni az adatokat, hogy Irányítószám; Település; Utca/Tér stb. megnevezése; Utca/tér stb. fajtája; Házszám; Emelet; Ajtó.
Bocsi, tudom nem segítek ezzel a kommenttel, de szerintem a többiek se fognak minden egyes ilyen egyedi esetre leprogramozni neked egy megoldást. -
Mittu88
senior tag
válasz littleNorbi #23838 üzenetére
Ez sajnos hatalmas szívás :/
Hány tétel van nagyjából, amit javítani kell? Nem tudsz gyorsan végigfutni rajta szemmel? -
Mittu88
senior tag
válasz littleNorbi #23863 üzenetére
részvétem :/
-
Mittu88
senior tag
válasz repvez #23873 üzenetére
Szerintem egyszerűbb, ha egy másik munkalapon megvannak az adatok.
Írd be A1-be, hogy 100000. Utána menüszalagon Kezdőlap\Szerkesztés\Kitöltés\Sorozatok...
Ezen belül Számtani, Lépésköz: 100 Végérték 1000000.
Ha ezzel megvan, mellé B1-be egy képlet: =A1*0,67 C1-be meg: A1*0,74
Aztán behivatkozod diagramba.Így jó?
-
Mittu88
senior tag
Ilyet még nem láttam. Egyik kolléga gépén 2007-es magyar office van és az excel automatikusan letiltja a szerveren lévő 2010-es excelben készült makrós fájl makróját.
A "poén", hogy ha 2010-es excelben megnyitom a fájlt és elmentem, akkor a következő megnyitással működik a 2007-esben. A többiben viszont nem, tehát mindig meg kéne nyitnom 2010-essel és bezárnom, hogy utána 2007-esben jól működjön.
Minden be van állítva, minden makró engedélyezése, minden active x engedélyezése, megbízható helyek között a szerveren lévő mappa almappákkal együtt, stb.
Mi lehet ez? -
Mittu88
senior tag
válasz Fire/SOUL/CD #23942 üzenetére
Elvileg nem lehetne gond, most próbáltam egy másik 2007-es office-os gépen, teljesen szépen lefutott.
Olyan bonyolult parancsokat se használok, ami csak a 2010-esben van. Tök alap dolgok. -
Mittu88
senior tag
Lehet úgy hivatkozni munkalapra, hogy egy cella értéke a munkalapnév?
Pl. ha A1 értéke Január, akkor tudok valahogy azon keresztül a Január munkalapra hivatkozni? -
Mittu88
senior tag
-
Mittu88
senior tag
Sziasztok!
Egy tök egyszerű dologgal szívok. Egy xls fájlból szeretnék egy tartományt (C2640) átmásolni egy xlsx fájlba adott munkalapra úgy, hogy a kezdő cellát adom meg Range(Cells(sorokszama, 3))
Hogy a fenébe lehet?
-
Mittu88
senior tag
sziasztok!
Ebben segítsetek légyszi. A gondom, hogy az alábbi programkód után egyszer ugyan visszaugrik a hibaután: labelhez, de ha még egyszer hibát tapasztal, kifagy a program. Amúgy a munkalapnev változónak való értékadás után akad ki, mert sok esetben #HIÁNYZIK hibát dobna az fkeres függvény. Sajnos azt nem tudom kivédeni.
On Error GoTo hibavan
For sorszam = 2 To osszsorszam
hibautan:
Sheets(masodikadatbazis).Select
raktarszam = Cells(sorszam, 2).Value
munkalapnev = Application.WorksheetFunction.VLookup(raktarszam, Sheets("Raktárak").Range("$M$2:$N$90"), 2, False)
raktarszam = munkalapnev
...
Nexthibavan:
sorszam = sorszam + 1
GoTo hibautanHogy tudom megoldani, hogy az összes hiba esetén a hibavan:-ra ugorjon és ne akadjon ki?
-
Mittu88
senior tag
válasz Fferi50 #24443 üzenetére
Szia Fferi!
String mindkét változó, annál nincs gond (ugyan a nevében raktarszam, de string az is).
Amúgy azért kell errorhandler, mert több parancs is van ott, csak feleslegesnek tartottam leírni.
A probléma az volt, hogy a GoTo hibautan helyett Resume hibautan kellett.Köszönöm szépen a segítséget, hatttalmas riszpekt
Új hozzászólás Aktív témák
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- AKCIÓ! - STEAM kulcsok / Punch Club, Oddworld: Soulstorm, Children of Morta, stb. - 2024.05.16.
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
Állásajánlatok
Cég: Alpha Laptopszerviz Kft.
Város: Pécs
Cég: Ozeki Kft.
Város: Debrecen