- iPhone topik
- OnePlus Nord 3 - kapcsoljuk északot
- Milyen okostelefont vegyek?
- Megérkezett a Google Pixel 7 és 7 Pro
- Mobil flották
- Google Pixel 8 Pro - mestersége(s) az intelligencia
- Samsung Galaxy A52s 5G - jó S-tehetség
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Sony Xperia 1 V - kizárólag igényeseknek
- Telekom mobilszolgáltatások
Hirdetés
-
Nem lesz idén Nothing Phone (3)
ma És az AI tehet róla.
-
Kanada feltalálta a Netflix-adót
it Az online streamingszolgáltatások a belföldi árbevételük 5 százalékát ezentúl kötelesek átadni.
-
Computex 2024: a CEO az új rocksztár
ph A nagy technológiai cégek vezetőit film- és rocksztárokat idéző rajongással veszik körül itt.
-
Mobilarena
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 Sziszmisz #15367 üzenetére
Egy rövid makróval megoldhatod.
Sub Szetvalaszt()
Dim sor%, szin$, vesszo%
sor% = 2
Do While Cells(sor%, 1) > ""
szin$ = Cells(sor%, 4)
vesszo = InStr(szin$, ",")
If vesszo Then
Range("A" & sor% + 1).EntireRow.Insert
Range(Cells(sor%, 1), Cells(sor%, 3)).Copy Cells(sor% + 1, 1)
Cells(sor%, 4) = Left(szin$, vesszo - 1)
Cells(sor% + 1, 4) = Right(szin$, Len(szin$) - vesszo - 1)
End If
sor% = sor% + 1
Loop
End SubProgramozó: 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
- Diablo IV
- Nők, nőügyek (18+)
- Politika
- Nvidia GPU-k jövője - amit tudni vélünk
- Futás, futópályák
- Kaspersky Antivirus és Internet Security Fórum
- Feltörték a PROHARDVER!-es regisztrációmat! (vagy elvesztettem a belépési emailcímemet)
- iPhone topik
- Debrecen és környéke adok-veszek-beszélgetek
- Sorozatok
- További aktív témák...
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Alpha Laptopszerviz Kft.
Város: Pécs