- Milyen okostelefont vegyek?
- Redmi Note 13 Pro 5G - nem százas, kétszázas!
- Sony WF-1000XM4 - ezúttal koppan az áll
- Júniusban Magyarországra érkezik a Tecno, a fejlődő piacok egyik kedvenc márkája
- Kipróbáltuk a Xiaomi 14 Ultra fotós szettjét
- Xiaomi 14 Ultra - Leica hercegnő
- Mobil flották
- Android alkalmazások - szoftver kibeszélő topik
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Xiaomi Mi 9 - egy híján
Hirdetés
-
Retro Kocka Kuckó 2024
lo Megint eltelt egy esztendő, ezért mögyünk retrokockulni Vásárhelyre! Gyere velünk gyereknapon!
-
Ismét mozgásban a Kingmakers
gp Továbbra is izgatottan várjuk a játékot, amelyben a középkorba utazunk modern fegyverekkel.
-
Még több AI-t hozna a Windowsba a Microsoft
it Új eszközökkel ösztönözné a programozókat a Microsoft, hogy még több AI-t hozzanak el a Windowsba.
Új hozzászólás Aktív témák
-
EkSYS
senior tag
Sziasztok!
Abban tudna valaki segiteni hogy hogyan lehet egy combobox tartalmát betölteni egy adott tartományból? (esetleg egy egyszerü példa is hasznos lenne )
köszi!
Szerk: rá is jöttem:
Me.ComboBox1.List = Worksheets("Sheet1").Range("B12376").Value[ Szerkesztve ]
Eki - az eredeti
-
EkSYS
senior tag
sziasztok!
Ha valaki esetleg tud segíteni abban hogy miként lehet egy makró futása közben egy user inputtal várakoztatni a továbbfutást (mondjuk egy formon van több text és combo, és amikor ezek tartalmát ellenőríztetem egy makróval akkor ha üres textb.-t talál akkor klikkeljen bele a text.-be és egy msgbox vagy ok után menne tovább) , érdekelne
bEki - az eredeti
-
EkSYS
senior tag
Sziasztok!
Van valakinek egy jól működő dátum szűrője (date filter)?
Jó pár verziót megpróbáltam de mindig ugyanaz lett a vége: nem szűrtDim MyDate
MyDate = Format(DateSerial(2012, 3, 13), "éééé.hh.nn")
ActiveSheet.AutoFilterMode = False
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=1, Criteria1:=MyDate
valakinek valami ötlet?
Eki - az eredeti
-
EkSYS
senior tag
Sziasztok !
Találkozott már valaki a 2029-es hibával?
Nálam most jött elő először és nem tudom hogyan lehetne megoldani. Röviden.
Adott egy xls. amiben van több munkalap. az egyikben az egyik oszlop tartalmát szétszedem (9 oszlopra), majd kikopziok 7-et és átmásolom egy másik munkalapra ahol beszúrom A-tól. J-ig, és J től megint jönnek oszlopok, de az már máshonnan.
A feladat egyszerű összehasonlítgatós /keresős adott feltétel rendszer alapján.
A keresés A - F oszloptartományban zajlik. Ma kiderült a H I -ben is kell, átírtam a keresős algoritmust, és amikor ebbe a két új oszlopba kéne nyúlnia kiáll type mismatch-csal error 2029 (megnéztem a neten, de erre nem találtam megoldást)
valakinek ötlet?Eki - az eredeti
-
EkSYS
senior tag
Sziasztok!
Érdekes problémával találkoztam, s nem tudom mi a megoldás:
Adott egy leltári kivét forma. Az első kombó ami be is van pipálva gyakorlatilag beadja az összes alkatrészgyártót. Majd a nagy kombó ami le is van gördítve meg kiadja minden olyan tétel típusát ami az első kombóban kiválasztott értéknek megfelel. Egyszerű. Ehhez az alábbi megoldásokat használtam:
1.kombó betöltése:
Do While Worksheets("alkresz").Range("A" & sor2).Value <> ""
sor2 = sor2 + 1
leltar1.ComboBox2.AddItem Worksheets("leltarpivo").Range("I" & sor2).Value
Loop
sor2 = sor2 - 1
Worksheets("alkresz").ActivateMajd betöltöm a nagy kombót:
Public Sub alkatcombo5toltes()
Dim sor As Integer
Dim xkeres(1 To 10) As String
xkeres1 = ""
xkeres2 = ""
sor = 2If leltar1.CheckBox1.Value = True Then
xkeres1 = leltar1.ComboBox1.Value
Else
End IfIf leltar1.CheckBox2.Value = True Then
xkeres2 = leltar1.ComboBox2.Value
Else
End Ifleltar1.ComboBox5.Clear
Do While Worksheets("alkresz").Range("A" & sor).Value <> ""
'PME
If Worksheets("alkresz").Range("I" & sor).Value = xkeres1 Then
leltar1.ComboBox5.AddItem Worksheets("alkresz").Range("E" & sor).Value
'Alk.gyártó
ElseIf Worksheets("alkresz").Range("H" & sor).Value = xkeres2 Then
leltar1.ComboBox5.AddItem Worksheets("alkresz").Range("E" & sor).ValueEnd If
sor = sor + 1Loop
A probléma az hogy a képen látható a nagy kombóban kiválasztott érték a helyes, csakis az a másik 3 nem. De az mindig benne marad. mindent szépen megtalál, csak ez a nyomorult 3 marad bent mindig.
Valakinek hasonló tapasztalata? Ötlete?Eki - az eredeti
-
EkSYS
senior tag
Sziasztok !
Tudna nekem valaki egy olyan html rövid kis kódsort írni ami egy adatok.xlsx -be bepakol pár adatot amit a html felületen lehet beadni?
Az számít ha az xlsx egy a hálózaton lévő másik gépen van?köszi!
bEki - az eredeti
-
EkSYS
senior tag
Sziasztok!
Olyat hogy lehet csinálni hogy egy userformon lévő textboxon keresztül a user megad egy számot (1-től 10-ig) majd ennek megfelelően a program létrehozza a megadott számú textboxot ugyanezen a formon (vagy akár újon) és hogy lehet dolgozni /azonosítani ezeket a textboxot hogy ezeknek az értékeit tudjam használni?
köszi
bEki - az eredeti
-
EkSYS
senior tag
Köszönöm . Vb.netben meg nem próbáltam.
Eki - az eredeti
Új hozzászólás Aktív témák
- Dell G5 5590 15.6" FHD IPS i5-9300H GTX 1650 16GB 1TB magyar vbill ujjlolv új akku gar
- Xbox Series X 1TB - 9 hónap garancia, vállalkozástól!
- ESP8266 offline ETAHEN / GOLDHEN wifi modult
- EVGA GeForce XC GAMING RTX 3060 Ti 8GB DDR6 256bit LHR
- Dell Precision 5530 15.6" FHD IPS i7-8850H P1000 16GB 512GB NVMe új akku gar
Állásajánlatok
Cég: Alpha Laptopszerviz Kft.
Város: Pécs
Cég: Ozeki Kft.
Város: Debrecen