-
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
-
fricc_
tag
válasz Fferi50 #36567 üzenetére
Köszönöm, az első megoldást értem és működik is.
A fix n=2 csak a debug miatt volt bent :-)
Viszont mivel nyitott vagyok minden újra, főleg amit nem ismerek, kipróbáltam a másik két megoldást is, de a programba beillesztve nem tudtam működésre bírni.
Talán az alábbi két megoldást ki kéne még egészíteni valamivel?
A te 2. javaslatod:
Dim cl As Range
For Each cl in Rows(5).Cells :if cl.EntireColumn.Hidden Then
n=cl.Column :Exit Forill. Pakliman megoldása:
For Each cl in Rows(5).Columns: If cl.Hidden Then
[ Szerkesztve ]
-
Sesy
aktív tag
válasz Fferi50 #36685 üzenetére
Megpróbáltam megcsinálni, erre gondoltál?
egy másik munkalapon vannak az adatok, és fkeres függvénnyel töltöm ki a sort
az excel fájlt választva címjegyzéknek a körlevélnél azt a munkalap tábéát választom, ahol ez a táblázat szerepel...
ez lesz belőle:
ez eddig szép és jó, de ha az excelben módosítok a legördülő menüben egy másik építőanyagra, akkor a wordben nem történik semmi, nem frissül az adat
csak úgy tudtam, megcsinálni, hogy újra beillesztettem... valószínűleg rosszul csinálomBorn stupid... Try again!
-
Sesy
aktív tag
válasz Fferi50 #36697 üzenetére
Köszi,
ez meg van, és működik is
ezzel egy építőanyag tulajdonságait (bármennyit) amelyek egy sorban vannak simán be tudom már olvasniha jól értem, akkor egy fejlécet és egy sort tudok egy adott dokumentumon belül használni, mert
a második sor már másik "levelet" jelent...most már csak azt kell megoldanom, hogy egy dokumentumon belül 20-25 építőanyag tulajdonságot tudjak automatikusan megadni amelyek ugyan abból az excelből jönnek, és ugyan abban a doc fájlban vannak
[ Szerkesztve ]
Born stupid... Try again!
-
Sesy
aktív tag
válasz Fferi50 #36699 üzenetére
köszi
én is erre jutottam közbenaz még a kérdés, ha egy cellában több sorban vannak az adatok, akkor ha átviszem wordbe akkor meghülyül tőle teljesen szét dobja a megformázott oldalamat... mit tegyek
be lehet azt állítani, hogy egy cellában milyen beállításokkal szerepeljen a szöveg, ha onnan viszem át a wordbe?
ha átviszek egy cellából egy szöveget a dokumentum fájlba, akkor olyan, mintha formázott szöveg lenne
pl: térköz előtte/utána stb... ezzel lehet kezdeni valamit? például csak egy normál formázatlan arial 10 betűméretű balra rendezett szöveget hozzon át?Born stupid... Try again!
-
Delila_1
Topikgazda
válasz Fferi50 #36701 üzenetére
Egyszerűbb a Csere funkciót (Ctrl+h) alkalmazni, az minden oszlopban cserél, nem kell oszloponként bevinni a HELYETTE függvényt.
Az adatokhoz felvennék egy új oszlopot, ahol pl. egy *-ot tennék azokba a rekordokba, amelyeket a körlevélbe aktuálisan be akarok tenni. Ez lenne a feltétel a rekordok kiválasztásához az összefésülésnél.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
-
Sesy
aktív tag
válasz Fferi50 #36704 üzenetére
"Ezért a csak szöveget kell beillesztésnél választani."
Ha ezt választom, akkor viszont megszűnik a kapcsolat a forrás fájllal tehát ez nem jó
"Ha a forrásformátum megőrzését választod, akkor bizony belekerül."
az a baj, hogy akkor is bele kerül, ha a formázás egyesítését választom, vagyis minden esetben ha a kapcsolatot meg akarom tartani az excel fájlommal...
Ki lehet ezeket szedni valahogyan?
A körlevéllel az a baj, hogy ha az adatok a beillesztésre kerülő cellában több sorban vannak akkor teljesen meghülyül tőle...
Érdekes, hogy a probléma nem túl bonyolult, mégsem lehet egyszerűen megoldani...
Born stupid... Try again!
-
Sesy
aktív tag
válasz Fferi50 #36715 üzenetére
OK!
Összerakok valamit, valódi adatokkal az eddigi tanácsaitok szerint, és felteszem ide.
A látszat ellenére NAGYON sokat segítettek ám
lassan kezd összeállni a megoldás bennem és ha meg van akkor majd tudtok belőle jobbat csinálni szerintem
köszi az eddigi segítséget
Born stupid... Try again!
-
CsoGe
csendes tag
válasz Fferi50 #36743 üzenetére
Hali!
Így nézett ki eddig a makró:
Sub LPA_2018()
Randomize
For i = 3 To 7
For j = 5 To 5
Cells(i, j) = Int((153 * Rnd) + 1)
Next
Next
End SubA válaszod alapján nekem a For i=3-as sor így nézne ki:
For i = Range("E1").End(xlDown).Offset(1,0Valamit tuti, hogy félre értek...
Köszi,
Gergő -
Csatravi
senior tag
válasz Fferi50 #36807 üzenetére
Beírtam így és működik, feljön a hibaüzenet.
[kép]A működés már jó de a figyelmeztetéssel van még gondom.
A 7-16 sorok rejtve lesznek tehát az adatok nem fognak látszódni.A végleges verzióban kb 20000 sor lesz rejtve. Így csak szinte a keresési és találati cella lesz látható. Terv szerint A1:E7-ig. kerül a képernyőre mivel mobil képernyőre lenne tervezve. Így ez a nagy hibaüzenet kívül esne a képernyő méretből és így a képet húzogatni kellene.
Ezért gondoltam az egy cellában megjelenő hiba jelzésére. Ez megoldható lenne ?
A másik a betű mérete. Megoldható, hogy mindegy legyen, hogy mit használ ? -
Csatravi
senior tag
válasz Fferi50 #36813 üzenetére
Sajna nem értek hozzá de ebből már sikerült valamit összeraknom.
A B4-hez beírtam a =HA(C2="HIBÁS ADAT";" kezdetű sort.
A C2-be a =HA(HIBÁS((ÉS(VAGY(ÉS(KÓD..... sortÍgy ha rossz formátumban írok be akkor....
[kép]Ha jó formátumban de olyan adatot ami nincs az első oszlopban akkor...
[kép]A kis és nagybetűre is egyformán jól keres.
Köszönöm !
-
Csatravi
senior tag
válasz Fferi50 #36817 üzenetére
Nekiálltam próbálgatni ahogy a https://logout.hu/tema/excel/hsz_36815-36815.html írtam.
Azt vettem észre, hogy ha jól írok be mindent akkor frankó.
Ha 1 betűt és csak 2 számot tehát hibásan akkor szépen jelez.[kép] Ez így jó.
Viszont ha pld egy betűt és utána 4-5 számot vagy csak számokat írok be akkor nem írja ki a C2-be hogy "Hibás adat" és "Hibás keresés."
[kép] -
Csatravi
senior tag
-
Delila_1
Topikgazda
-
Csatravi
senior tag
válasz Fferi50 #36836 üzenetére
Nem vitatom, hogy akár keverem is a dolgokat. Sajna nem értek hozzá.
És igaz, hogy a nem létező adat az nem hibás adat. Igaz én oda soroltam. Azt szeretném elkerülni hogy hibás adatként megfelelő visszajelzés legyen. Viszont a nem létező adatnál a felhasználó a nem létező adatnál is kellően figyelmeztetve legyen hogy rossz karakter sorozatot írt be. Csak nem értettem, hogy a K000 nem létező adatra megjött a figyelmeztetés a K123 nem létezőre pedig nem. -
-
csferke
senior tag
válasz Fferi50 #36922 üzenetére
Szia!
Az 1.-re adott válaszod OK. Köszi.A 2.-ban viszont a PathName nevet én adtam (az aktív munkafüzet neve, kiterjesztés nélkül)
PathName = Left((ActiveWorkbook.Name), (Len((ActiveWorkbook.Name)) - 5))
és ez alapján kellene meghatározni/megváltoztatni a mappát (elérési útvonalat) ahová majd szeretnék adatokat kiíratni ChDir amely nem ugyanaz mint az aktuális mappa.ChDir "g:\Google Drive\TRANSPORT\" & PathName
üdv
[ Szerkesztve ]
-
csferke
senior tag
válasz Fferi50 #36924 üzenetére
Szia!
Igen, vannak almappák a Transport mappában.ChDir "g:\Google Drive\TRANSPORT\"
Mivel több munkafüzetem is dolgozik a rendszerben így a megnyitásukkor egy HovaMenteniMappa makróval szeretném megadni, hogy a megfelelő almappába kerüljenek a kiíratások.Tehát a kiírás helye
ChDir "g:\Google Drive\TRANSPORT\"+PathName
A PathName-t itt határozom meg az éppen aktuális/megnyitott munkafüzet neve alapján
PathName = Left((ActiveWorkbook.Name), (Len((ActiveWorkbook.Name)) - 5))
Ha így adom meg, fixen
ChDir "g:\Google Drive\TRANSPORT\MappaNeve"
akkor tökéletesen firkál a MappaNeve-be de ez változó kellene, hogy legyen az ActiveWorkbook.Name => PathName alapján.üdv
[ Szerkesztve ]
-
excel_segits
újonc
válasz Fferi50 #36943 üzenetére
Szia!
Köszönöm először is a segítségedet, egy isten vagy!
Viszont a képlettel valami nem stimmel, mert az A33-as mezőt hívja meg elsőként, és nem az A3-ast.
=INDIREKT("FELVÉTEL!A3"&SOR()*3)
Felvétel munkalapról 3ik sorral kéne kezdeni (A3-cella).
Tényleg nagyon köszönöm a segítséget
-
SANYIBP11
újonc
válasz Fferi50 #37053 üzenetére
Folytatás
Adott egy munkalap kb 1000 sorral nem egymásután random vannak az adatok. De fix az oszlopszám. Tehát A oszlopban vannak azok amikre kíváncsi vagyok hogy a B oszlopban szerepel e. Viszont csak abban az esetben ha a Kód például HHY. Sokmindennel próbálkoztam.
[ Szerkesztve ]
-
morfondőr
őstag
-
spe88
senior tag
válasz Fferi50 #37170 üzenetére
Persze a szűrőt azt ismerem, csak nekem ezekből tovább dolgozik a fv.
Ha valahogy makrósítani lehet az is jó.
Bár jobb volna ha nem kéne gombokat nyomogatni így is van már egy halom a táblában, de ha máshogy nem jön össze, akkor jó makróval is.A probléma, hogy mondjuk van 10 elem az A oszlopban mindegyiknek mondjuk 3 különböző eleme a B oszlopban.
Azt a 30 elemet kéne egy oszlopba rendezni. Na ezt hogyan?Szűrővel egyesével végig menni és beütni az adott számot majd copy paste nem játszik.
Spóroljunk! Kerül, amibe kerül!
-
Louro
őstag
válasz Fferi50 #37176 üzenetére
Erre én is gondoltam, de az kb. büntetés a felhasználóknak, hogy "körlevél-zárjátok be most-átállítja nem közös munkafüzetre-frissít-visszaállít közösre-munka folytat".
Ez (is) elég fura megoldása a M$-nak.
Akkor mai munkám kb. kuka is lesz. SP-t meg annyira nem ismerem, hogy rövid idő alatt kitanuljam, miként tudnék SP listát .csv-vel etetni. (Ez már csak siránkozás, bocsi.)
Mess with the best / Die like the rest
-
m_kovacs
tag
válasz Fferi50 #37196 üzenetére
Köszönöm a választ.
Sajnos továbbra is szintax error erre a sorraaid=Application.Worksheetfunction.VLookup(nev;Value;E1:F46;2;HAMIS)
Hiba biztos nem lesz.(hosszú lenne leírni, hogy miért)
Ha végképp nem sikerül, megoldom delphiből.
Akkor azt kérdezem, lehet olyat csinálni, hogy legördülő listából a visszaadott érték ne a kiválasztott sor-oszlop érték legyen, hanem a sor-oszlop+1 érték?
Köszönettel m_kovacs -
m_kovacs
tag
-
Flowtation
őstag
válasz Fferi50 #37205 üzenetére
Szia!
köszönöm a választ! Amint ezt elmondtam, egyből nem lett olyan fontos a dolog....tanulság: nem kell mindent egyből megcsinálni, persze ha időben szólnak, akkor megoldható...ehh tanarak, de senkit nem szeretnék megbántani.Keresek: D-link covr-1102 2 pack routert.
-
Vééé
csendes tag
válasz Fferi50 #37283 üzenetére
Szia!
Igen, a körlevél arra való, hogy címlistából a címzettet behelyettesítse. A gond az, hogy nem egy-egy adat van, hanem 4. Kicsit próbálom érthetőbben. Gondolj egy olyan adatbázisra (pontosabban táblázat), ahol 4 oszlop van, valahogy úgy, hogy az első oszlop az étel neve, a második a hozzávaló mennyiség, a harmadik a mértékegység, negyedik a hozzávaló fajtája.
Tehát van 40e ilyen sorunk:palacsinta 1 kg liszt
palacsinta 4 db tojásés még rengeteg olyan sor, ami palacsinta, rengeteg olyan nem palacsinta, amihez liszt kell, vagy amihez 1 kg bármi.
Ez az egész halmaz egy táblázatban van.És ebből szeretnék én egy 300+ oldalas szakácskönyvet, ami felírja az oldal tetejére hogy palacsinta, alá pedig felsorolja a hozzávalókat. A kettő között pedig szöveg van, minden oldalon ugyanaz.
A körlevél annyit tud, hogy az xls oszlopait beszúrja, és minden sor külön levél lesz. De itt 40e+ sor van, magyarán 300 oldal helyett 40e oldalas lesz a szakácskönyvünk.
Ez egyébként egy nagyon egyszerű, logikailag jól leírható probléma, kizártnak tartom, hogy ne legyen rá valamilyen szoftveres megoldás, akár access-en keresztül.
-
Teejay83
tag
válasz Fferi50 #37292 üzenetére
Gondoltam ha van egy tábla amiben helyesen vannak az adatok onnan ki tudná szedni vagy ez nem lehetséges? Max 30 településről van szó nem országos címlista
DPS Hungary- szoftverrobot fejlesztés-online marketing támogatás-rendszerek bővítése,korszerűsítése-digitalizáció-IT biztonsági tanácsadás | www.onlineasszisztens.com | www.dpshungary.eu |
-
dellfanboy
őstag
válasz Fferi50 #37298 üzenetére
az fkeres-es működött a Ha fv-be túlságosan belebonyolódtam.
máslenne egy olyan kérdésem hogy
van 4 oszlopom szöveggel és az ötödikbe szeretném a 4 szöveg átlagát írni
pl. ha
jó- jó-jó- közepes van akkor az ötödik oszlopba jó kerüljön
jó közepes közepes közepes akkor az ötödik oszlopba közepes kerüljön stb.ezt ti milyen fv-vel oldanátok meg?
még 1xköszöönm
[ Szerkesztve ]
eladó dolgok:mondd az árát és vidd http://hardverapro.hu/tag/dellfanboy#aprohirdetesei
Új hozzászólás Aktív témák
- Azonnali processzoros kérdések órája
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Fűzzük össze a szavakat :)
- Kerékpárosok, bringások ide!
- Aliexpress tapasztalatok
- Nintendo Switch
- Háztartási gépek
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- További aktív témák...
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: Ozeki Kft.
Város: Debrecen