-
GAMEPOD.hu
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
válasz Fire/SOUL/CD #11712 üzenetére
Na meglett a hiba.
A második form Initialize() eseményében volt egy sor ami rejtett munkalapot akart aktiválni és ez akasztotta meg a programot.Csak azt nem értem, hogy a munkalapról viszont szépen beolvasta a form összes labelére az összes adatot.
Private Sub UserForm_Initialize()
'Dim vissza As String
'vissza = ActiveSheet.Name
Dim hova As String
'Application.ScreenUpdating = False
'Worksheets("eredmenyek").Visible = True
Worksheets("eredmenyek").Activate
For j = 1 To 4
hova = Cells(1 + j, 7).Value
For k = 1 To 10
Controls(hova & k).Caption = Cells(1 + k, 1 + j).Value
Next
Next
'Worksheets("eredmenyek").Visible = False
'Worksheets(vissza).Activate
'Application.ScreenUpdating = True
End SubA kikommentezett sorok kerültek be utólag és így már működik.
Köszi mégegyszer.
[ Szerkesztve ]
Új hozzászólás Aktív témák
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- Adobe Creative Cloud - 2024. 04. 05 - 2025. 04. 05-ig
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.