Hirdetés
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- droidic: [Memory Leak] Az agy defragmentálása
- Gurulunk, WAZE?!
- Magga: PLEX: multimédia az egész lakásban
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- bambano: Bambanő háza tája
- Parci: Milyen mosógépet vegyek?
-
LOGOUT
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
-
válasz
Fferi50
#31853
üzenetére
Szia Fferi50!
Bocs, hogy megint zargatlak, de elakadtam...
A tegnapi szkripted teljesen jól működik, de egy dolgot sehogyan sem tudok benne megoldani, pedig fél nap ezzel foglalkoztam. Az lenne a jó, ha a kereső mező egy "GUI" nevű excel fájlban lenne, míg az adatok egy másik, mondjuk DATA nevű excel fájlban kapnának helyet. Ha ez így túl összetett, tulajdonképpen az is rendben lenne, ha egy fájlban lenne a felület és a forrás is, két külön munkalapon.
Alapvetően az oszlopok / sorok elrejtése is opció lenne, de attól meg kidől a szkript.
Köszönöm a segítséget előre is!
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B2")) Is Nothing Then
Application.EnableEvents = False
ActiveWorkbook.FollowHyperlink Address:=Range("$A$7:$A$1000").Find(What:=Target.Value, LookIn:=xlValues, lookat:=xlWhole).Offset(0, 1).Value
Application.EnableEvents = True
Range("B2").Select
End If
End Sub -
Declare
őstag
válasz
Fferi50
#31853
üzenetére
Erre esetleg ötlet?[link] Ugy erzem, nem lehet nagyon nagy különbseg, de nem tudtam atirni, pedig probalkoztam a net segitsegevel

Meg meg egy kerdes ugy mindenkihez:
Szeretnek egy makro gombot kesziteni magamnak a következö müvelethez:
Valahol all a kijelöles egy sorban, cellaban (Pl: D10)
- Szurjon be egy teljes sort föle (ez az ujjonan beszurt sor lesz most már a 10-ik sor)
- Masolja ide a teljes 9 sort (azaz ami a beszurt sor fölött van)
- "K" cellájába (K10) be irja be, hogy "Gyár",
- M10 be irja be a következö kepletet=M9*0,1Probaltam most ezt is kisakkozni, egy egy rész össze is jön, de egy makroba nem sikerül megoldanom
A gombot mar meg tudtam csinalni, csak a makro hianyzik mögüle 
Esetleg erre egy megoldás?

Új hozzászólás Aktív témák
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Vírusirtó licencek- Azonnal - Számlával - Garanciával
- Eladó Steam kulcsok kedvező áron!
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok : (12.20.)
- HIBÁTLAN iPhone 15 Pro Max 256GB Natural Titanium -1 ÉV GARANCIA -Kártyafüggetlen, 100% Akkumulátor
- Telefon felvásárlás!! Samsung Galaxy S25, Samsung Galaxy S25 Plus, Samsung Galaxy S25 Ultra
- HIBÁTLAN iPhone 13 Mini 128GB Pink-1 ÉV GARANCIA - Kártyafüggetlen, MS4214, 100% Akksi
- Új, Aktiválatlan, iPhone 15 (128 GB) (rendelhető)
- Eladó XFX Radeon 7700 2GB videokártya
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: BroadBit Hungary Kft.
Város: Budakeszi

A gombot mar meg tudtam csinalni, csak a makro hianyzik mögüle 


