- iPhone topik
- Android alkalmazások - szoftver kibeszélő topik
- Elindult a One UI 8 frissítés
- Apple iPhone 17 - alap
- Samsung Galaxy Buds3 Pro - szárat eresztettek a babok
- Megérkeztek a Xiaomi 15T sorozatának telefonjai Magyarországra
- Megérkezett Magyarországra a legkülönlegesebb kameratelefon
- Apple iPhone 17 Pro Max – fennsík
- Android szakmai topik
- Képeken a Huawei új Watch GT 6 órái
-
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
veterán
Az előzőnél az
oszlop = Application.Match(cim, Range("G1:BB1"), 0)
sor olykor 0 értéket ad, ha nem található a G1 : BB1 tartományban a cím.
Az eredetiIf VarType(oszlop) = vbError Then
sort ezért kibővítettemIf VarType(oszlop) = vbError Or oszlop=0 Then
-re, de lemaradt egy p betű az oszlop végéről. -
Delila_1
veterán
Sub Masolas()
Dim cim As String, sor As Long, tartomany As Range, oszlop As Integer, usor As Long
Set tartomany = Selection
sor = tartomany(1).Row
cim = Cells(sor, 2)
On Error Resume Next
oszlop = Application.Match(cim, Range("G1:BB1"), 0)
If VarType(oszlop) = vbError Or oszlo=0 Then
oszlop = Cells(1, Columns.Count).End(xlToLeft).Column + 1
Cells(1, oszlop) = cim
Else
oszlop = oszlop + 6
End If
usor = Cells(Rows.Count, oszlop).End(xlUp).Row + 1
Selection.Copy Cells(usor, oszlop)
End Sub
Új hozzászólás Aktív témák
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- Futás, futópályák
- Hobby rádiós topik
- Autós topik látogatók beszélgetős, offolós topikja
- Torrent meghívó kunyeráló
- Otthoni hálózat és internet megosztás
- exHWSW - Értünk mindenhez IS
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- iPhone topik
- Elektromos autók - motorok
- További aktív témák...
- Samsung Galaxy S21 Ultra / 12GB RAM 256GB / Gyárifüggetlen / 12Hó Garancia
- GYÖNYÖRŰ iPhone 11 64GB White -1 ÉV GARANCIA - Kártyafüggetlen, MS3348, 93% Akkumulátor
- HIBÁTLAN iPhone 13 mini 128GB Green -1 ÉV GARANCIA -Kártyafüggetlen, MS3600, 94% Akkumulátor
- TP-LINK TL-WA850RE 300M vezeték nélküli jelerősítő / 12 hó jótállás
- Designer 4K Monitor - BenQ PD-2700-U
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest