-
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
-
Delila_1
Topikgazda
válasz lenkei83 #21521 üzenetére
Próbálkoztam, de nem jön össze.
Sub lapok()
Dim lap%, szoveg$
For lap% = 1 To Worksheets.Count
If Right(Sheets(lap%).Name, 1) = "x" Then
szoveg$ = szoveg$ & Sheets(lap%).Name & """" & ","
End If
Next
szoveg$ = Left(szoveg$, Len(szoveg$) - 2)
Sheets(Array(szoveg$)).Select
End SubAz utolsó sornál túlcsordulást jelez. Talán kiindulásnak jó.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
Új hozzászólás Aktív témák
- Kerékpárosok, bringások ide!
- Assassin's Creed Odyssey
- Tényleg jobban fogyaszt a Peugeot, az Opel és a Citroen?
- Xbox Series X|S
- Kormányok / autós szimulátorok topicja
- Microsoft Surface
- Elektromos autók - motorok
- Milyen okostelefont vegyek?
- Elden Ring
- XGS24 - Október elején jön a Diablo IV - Vessel of Hatred
- További aktív témák...
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen