-
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
-
m.zmrzlina
senior tag
Köszi a választ.
Ezt a tulajdonságot ismerem csak azt reméltem, hogy lehet a függvények relatív cellahivatkozásához hasonlóan elérési útra is hivatkozni úgy hogy nem "betonozod" bele a makróba a teljes elérési utat.Az lesz a megoldás, hogy a <ThisWorkbook.Path> legutolsó "\" utáni karaktereit kicserélem a forrásfájl nevére mivel a forrásfájl mindig eggyel makrót tartalmazó mappa feletti mappában van.(a képen ez a test mappa) és a két fájl relatív helyzete mindig ugyanaz.
-
paatrick
őstag
Sajnos nincs, és azóta nézegettem videókat a 2007-es, 2010-es változatról ott tényleg van nagyítási lehetőség az általad említett jobb alsó sarkos módon. Szóval arra a következtetésre jutottam hogy ez a funkció az én 2003-as excelemben még nincs.
Így aztán marad a csúszka húzogatás, de legalább megtudtam hogy a későbbi verziókban van.Köszönöm a segítséget.
Jó éjt
-
paatrick
őstag
Félreértetted.
Szóval, megnyomom az autószűrő kis gombját a cella jobb sarkában akkor legördül az amit fent is linkeltem. Ki tudom választani hogy csak a 4-eseket mutassa egy gombnyomással, de ha csak a 15-ösöket akarom látni akkor le kell gördítenem (mellesleg gördíteni nem is tudok csak a csúszkát húzni) és csak utána tudok rányomni a 15-ösre.
Szóval azt akarom hogy az autoszürő legördülője "hosszabb" legyen lefelé és beleférjen 0-15 egyben.csináltam egy képet és akkor jobban látszik mi a vágyam:

-
-
Delila_1
veterán
Létezik, de ezt elegánsabbnak gondoltam.
Töröld a figyelmeztetést tartalmazó címkét. A Gomb2-höz tartozó makró így módosul:Private Sub Gomb2_Click()
If Igeny1 = "Nem kérem" Then
MsgBox "Figyelmeztető szöveg", , "Box címe"
Igeny2.Visible = True
IgenyL.Visible = True
Else
Igeny2.Visible = False
IgenyL.Visible = False
End If
End SubAhhoz, hogy a lapok közötti váltásnál csak akkor jelenjen meg a B lap IgenyL címkéje, és az Igeny2 ComboBox, mikor az A lapon a "Nem kérem" szöveg van érvényben, írd be ezt a rövid makrót a többi közé:
Private Sub MultiPage1_Change()
Igeny2.Visible = False
IgenyL.Visible = False
End Sub -
Delila_1
veterán
Könnyebb elkészíteni, mint leírni a munka menetét.

Az előzőnél nem írtam be a figyelmeztető szöveget.
A ComboBox-ok listáját a RowSource tulajdonságnál adtam meg. -
Attas
aktív tag
Köszi a válaszod.
Megnéztem nála...a makrók engedélyezve vannak. Ugyanabban a mappában van a 2 fájl.
Sub HetiMasolasTípus1() 'Statisztikába másolás Típus 1
Workbooks("Statisztika").Sheets("Típus 1.").Protect Password:="**********", UserInterfaceOnly:=True
Application.ScreenUpdating = False 'Frissítés tiltása
Dim sor As Integer
Range("Gépek").Copy
Workbooks("Statisztika").Activate
Sheets("Típus 1.").Select
Range("C1").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Workbooks("Ütemidő_számolás_ZKG_FLEX.xlsm").Activate
Sheets("Kimutatás").Select
Application.ScreenUpdating = True 'Frissítés engedélyezése
End SubÍgy néz ki a programkód. 8 típus van, ugyanezzel iiletve van egy hasonló makró ami töröl adatokat a Statisztika fájlból. Nálam minde tökéletessen működik. A főnökömnél meg egyik sem. Próbáltam úgy is, hogy a védelmet levettem akkor itt akad el a makró futása:
Workbooks("Statisztika").Activate
Ha a védelem marad akkor már a védelem feloldásánál... Nos nemtom..... -
hasonló problémám lenne. adott egy telefonszámla digitális formában
szám | idötartam
5551616 52
5552626 14
5553636 23
5551616 42
5550606 34
5552626 11
és azt szeretném ha erröl dobna nekem egy kördiagramot, hogy kivel mennyit beszéltemehhez össze kell adnia nevenként(számonként) az idötartamokat és ezt ábrázolnia a diagramon
ezt lehet valahogy egy lépésben vagy kell egy segéd táblázat ahova berakom a számokat és mellé az összeget (mert abból már csakcsak összehozom a diagramot)
a bibi az hogy nem 3-4féle szám van, szóval valami automatizált megoldás kellene.. de én még egy SZUMHA-t se tudok müködésre birni

-
core1113
csendes tag
wjani! köszönöm a gyors reagálást!
az írányítószámokat megyénként szeretném csoportosítani, külön lapokon. igazából öt megye releváns ebbő a szempontból. arra már meg van a szabály, hogy melyik irsz. intervallum egy megye. ....és gombnyomásra tökéletes. köszönöm , hogy foglakozol vele.

Új hozzászólás Aktív témák
- Fotók, videók mobillal
- Meghozta az első, memórapánikból eredő áremelését az NVIDIA
- Path of Exile (ARPG)
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Házimozi belépő szinten
- iPhone topik
- Vezeték nélküli fejhallgatók
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Multimédiás / PC-s hangfalszettek (2.0, 2.1, 5.1)
- Brogyi: CTEK akkumulátor töltő és másolatai
- További aktív témák...
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- Microsoft és egyéb dobozos retro szoftverek
- Fallout 4 Pip-Boy Edition eladó
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- FIFA 16 Playstation 4
- AZONNALI SZÁLLÍTÁSSAL Eladó Windows 8 / 8.1 Pro
- Samsung Galaxy S25 Silver Shadow 128GB használt karcmentes gyári garancia 2028.12.19.-ig
- 222 - Lenovo LOQ (15IRX10) - Intel Core i5-13450HX, RTX 5050
- BESZÁMÍTÁS! Sapphire B650M R7 8700F 32GB DDR5 512GB SSD RX 9070 XT 16GB CM MasterBox 5 fehér 750W
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


Legalább egy fényképet küldhettél volna róla! 
Fferi50