Soru Clipboard daki veriyi düzenleme

[k0081]

Merhaba arkadaşlar

Siteden bir Linki kopyalıyorum. ( CTRL + C ) ->

[url=https://www.hizliresim.com/32jnyas][img]https://i.hizliresim.com/32jnyas.png[/img][/url]

command buton kullanarak sadece -> https://i.hizliresim.com/32jnyas.png kısmını tekrar hafızaya nasıl alabilirim ?

* Not : uzantı herzaman png dir.

yardımcı arkadaşa teşekkürler.

 

[veyselemre]

Sub test()
    'Microsoft Forms 2.0 Object Library
    'Referanslardan seçili olmalı veya çalışmada userform olmalı
    Dim dObj As New DataObject
    dObj.GetFromClipboard
    al = dObj.GetText
    With CreateObject("VBScript.RegExp")
        .Pattern = "\[img\](.+)\[\/img\]"
        .IgnoreCase = True
        If .test(al) Then
            Set m = .Execute(al)(0).submatches
            dObj.SetText m(0)
            dObj.PutInClipboard
        End If
    End With
End Sub

 

[k0081]

@veyselemre

Tek kelime ile Süper.!

Çok teşekkür ediyorum hocam. elinize sağlık.