Hirdetés
-
A kánikula elviseléséhez hardverek is kellhetnek a napernyő mellé
ph Tajpeji kiruccanásunk hetén többek között notebookok, monitorok, NAS, szimulátor-kiegészítő és kompakt hűtő igyekszik árnyékot találni.
-
Read Only Memories: Neurodiver teszt
gp A 2064 folytatása négy teljes évet csúszott a legelső tervekhez képest – a jövő transzhumanista világa még mindig roppant érdekes, a történet azonban már nem robotok, hanem agybúvárok körül forog.
-
Filléres Redmi érkezett
ma Az A3x nem kapott nagy bemutatót, egyszer csak felbukkant.
-
PROHARDVER!
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
-
motinka
tag
válasz Fire/SOUL/CD #7536 üzenetére
köszönöm Neked is!
ha nem haragszatok a kettőből csináltam egyet, remélem nagyon nem rontottam el, működik:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Range("HIÁNY"), Range(Target.Address)) Is Nothing Then
Range("A11").Select
Selection.AutoFilter Field:=5, Criteria1:=Cells(Target.Row, 1)
Selection.AutoFilter Field:=9, Criteria1:="="
End IfIf Target.Address = "$D$9" Then
Selection.AutoFilter Field:=5
Selection.AutoFilter Field:=9
End IfEnd Sub
Így csak a D9 cella hozza vissza az összeset.
Azt még persze jó lenne, hogy (mivel többen is dolgozunk ebben a táblázatban) bizonyos cellákat / oszlopokat/ tartományokat írásvédetté lehetne tenni.
Próbáltam a lapvédelem/ zárolt cellák pipa kivét módszerrel de akkor e VB nem működik.
Esetleg ha erre is tudtok valamit.köszi
MoTiNka
Új hozzászólás Aktív témák
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen