Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Makro - dvoklik mišem kao copy/paste

[es] :: Office :: Excel :: Makro - dvoklik mišem kao copy/paste

[ Pregleda: 2411 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

TbojšaN
Srbija

Član broj: 155714
Poruke: 26
*.dynamic.sbb.rs.



Profil

icon Makro - dvoklik mišem kao copy/paste05.01.2015. u 18:27 - pre 113 meseci
Može li da se napiše makro koji radi Copy -Paste?
U sheet1 podaci su od B1:B1000
dvoklikom na bilo koju ćeliju u tom opsegu (B1:B1000) da prekopira sadržaj u sheet2 u opsegu od od C10:C50, svaki put u narednu praznu ćeliju dok se ne ispuni opseg
Hvala
ako ne može onda dajte predlog, neku izvodljiu varijantu koja će da radi isto (da bude brže od copy-paste)

[Ovu poruku je menjao TbojšaN dana 06.01.2015. u 08:26 GMT+1]
 
Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2898



+66 Profil

icon Re: Makro - dvoklik mišem kao copy/paste14.01.2015. u 15:50 - pre 112 meseci
Ima već napisan od autora Petera :)
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim r As Long
    
    If Target.Column = 2 Then
        Cancel = True
        With Sheets("Sheet2")
            r = .Range("C" & Rows.Count).End(xlUp).Row + 1
            r = IIf(r < 10, 10, r)
            .Range("C" & r).Value = Target.Value
        End With
    End If
End Sub
 
Odgovor na temu

TbojšaN
Srbija

Član broj: 155714
Poruke: 26
79.101.107.*



Profil

icon Re: Makro - dvoklik mišem kao copy/paste18.01.2015. u 11:32 - pre 112 meseci
Thanks Ivek 33!
 
Odgovor na temu

[es] :: Office :: Excel :: Makro - dvoklik mišem kao copy/paste

[ Pregleda: 2411 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.