- Szakított a OnePlus és a Hasselblad
- Yettel topik
- Milyen okostelefont vegyek?
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Lecsap az S26 Ultra az Exynos 2600-ra
- Xiaomi 15T Pro - a téma nincs lezárva
- iPhone topik
- Huawei Watch GT 6 és GT 6 Pro duplateszt
- Megtartotta Európában a 7500 mAh-t az Oppo
- Apple Watch
-
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
-
m.zmrzlina
senior tag
válasz
pirit28
#9335
üzenetére
Valami ilyesmire gondolsz?
Private Sub CommandButton1_Click()
Cells(2, 3).Activate
Do Until ActiveCell.Value = ""
amitkeres = InputBox("Add meg a keresni kívánt nevet, vagy név részletet!", "Keresés", amitkeres)
Cells.find(What:=amitkeres, After:=ActiveCell, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Activate
Loop
End SubInputboxban bekéri a keresendő karaktersorozatot és végigkeresi a C sort az utolsó névig úgy, hogy minden találatnál megáll. <Enter>-rel tudsz a következő találatra ugrani.
Szerintem a munkalapra elhelyezett parancsgombos indítás nem a legcélszerűbb (ennél a megoldásnál biztosan nem). 2007-ben a Gyorsindítás eszköztárba tennék egy parancsgombot, korábbiaknál új menüpontot tennék a menübe.
Melyik Excel verziót használod?
Új hozzászólás Aktív témák
- Rocksztár lehet a ChatGPT-ből
- Meghalt a Windows 10, éljen a Windows 10!
- Luck Dragon: Asszociációs játék. :)
- Vicces képek
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Semmibe veszi a KRESZ-t a Tesla Mad Max módja
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Bittorrent topik
- Xbox tulajok OFF topicja
- One otthoni szolgáltatások (TV, internet, telefon)
- További aktív témák...
- GYÖNYÖRŰ iPhone 11 64GB Red -1 ÉV GARANCIA - Kártyafüggetlen, MS2190, 100% Akkumulátor
- Azonnali készpénzes AMD Radeon RX 5000 sorozat videokártya felvásárlás személyesen / csomagküldéssel
- Apple iPhone 15 128 GB Kék 12 hónap Garancia Beszámítás Házhozszállítás
- Bomba ár! HP ProBook 450 G5 - i3-7GEN I 8GB I 128GB SSD I 15,6" FHD I HDMI I Cam I W11 I Garancia!
- Új pc házak! Kèszleten!
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: NetGo.hu Kft.
Város: Gödöllő

Fferi50

