-
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
-
enzo_ferrari
tag
leírom a fontosabbakat:
a ''panelstart'' csak annyi, hogy feljön egy ablak amiben a megjeleníteni kívánt adatok vannak. Ezzel nincs gond.
A ''gomb'' makró azt csinálja, hogy amikor megnyitom a file-t ako a fenti menübe (ahol vannak a mentés, stb ikonok) berak az elejére egy szmájli ikont, amihez szeretném a ''Panelstart'' makrót rendelni. Amikor kilépek a file.-ból ako a gombot leszedi a menüsorból...
Most csak úgy műxik, hogy feljön a szmájli, de amikor rákattintok akkor feljön a Hozzárendelés a gombhoz ablak és ott már ki tudom jelölni, hogy rendelje hozzá a ''Panelstart''ot. Na ezt a lépést akarom elkerülni, megoldani makróval. -
enzo_ferrari
tag
a következő a problémám, de ez idáig oké:
Sub Panelstart()
I = 2
DialogSheets(''Panel1'').EditBoxes(''Beviteli mező 27'').Text = Format(Worksheets(''Munka1'').Cells(I, 1), ''#,##0'')
DialogSheets(''Panel1'').EditBoxes(''Beviteli mező 28'').Text = Format(Worksheets(''Munka1'').Cells(I, 2), ''#,##0'')
DialogSheets(''Panel1'').EditBoxes(''Beviteli mező 29'').Text = Format(Worksheets(''Munka1'').Cells(I, 3), ''#,##0'')
DialogSheets(''Panel1'').EditBoxes(''Beviteli mező 30'').Text = Format(Worksheets(''Munka1'').Cells(I, 4), ''#,##0'')
DialogSheets(''Panel1'').Show
End Sub
Sub gomb()
Application.CommandBars(''Standard'').Controls.Add Type:=msoControlButton, ID _
:=2950, Before:=1
End Sub
Sub Auto_Open()
Application.Run ''gomb''
End Sub
Sub gomb_le()
Application.CommandBars(''Standard'').Controls(1).Delete
End Sub
Sub Auto_Close()
Application.Run ''gomb_le''
End Sub
a kérdés:
hogy tudom megcsinálni, hogy a menübe berakott gomb (szmájli gomb) akkor is eltűnjön, ha új munkafüzetet nyitok és nem csak a munkafüzet bezárásakor?
a másik, hogy hogy a rákba tudom a szmájli gombhoz hozzárendelni egyből a ''Panelstart'' makrót? (odáig oké, hogy berakja, de nem rendeli hozzá egyből a makrót és annak nem ismerem a parancsát)
köszi
Új hozzászólás Aktív témák
- Apple iPhone 16 Pro Max 256GB,Újszerű,Dobozaval,12 hónap garanciával
- iKing.Hu - Apple iPhone 16e 128GB White használt újszerű 100% akku 83 ciklus garanciás 2026.10.26-ig
- HP ProDesk 600 G4 i3-8100 16GB 512GB 1 év garancia
- iKing.Hu - Apple iPhone 15 Plus 128GB Black használt szép állapot 90% akku 6 hónap garancia
- Telefon felvásárlás!! Samsung Galaxy A20e/Samsung Galaxy A40/Samsung Galaxy A04s/Samsung Galaxy A03s
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
sajnos ennyire nem vagyok otthon...én vagyok a szájbarágós típus.. 
Fferi50