İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Yalnız Excel-də bir hüceyrədən digərinə köprü nüsxəsini necə çıxarmaq olar?

Şübhəsiz ki, A sütununda dəyərlər siyahısı var və hər bir hüceyrədə fərqli bir köprü var. İndi göstərilən ekran görüntüsü kimi yalnız bir sütun E mətnsiz köprüləri kopyalamaq istəyirəm. Elə bil ki, Excel-də bu işi həll etmək üçün birbaşa yol yoxdur, amma burada onunla məşğul olmaq üçün VBA kodunu təqdim edə bilərəm.

1 başqa bir hüceyrəyə doc surətini kopyalayın

VBA kodu ilə digər hüceyrədən digərinə körpü köçürün


arrow mavi sağ bubble VBA kodu ilə digər hüceyrədən digərinə körpü köçürün

Yalnızca köçürmə ünvanlarını mətnsiz digər hüceyrələrə kopyalamaq üçün aşağıdakı kod bir xeyir verə bilər:

1. Basıb saxlayın ALT + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. Basın Taxmaq > Modules, və aşağıdakı kodu yapışdırın Modules Pəncərə.

VBA kodu: yalnız bir hüceyrədən digərinə köçürün:

Sub CopyHyperlinks()
'Uodateby Extendoffice
    Dim xSRg As Range
    Dim xDRg As Range
    Dim I As Integer
    Dim xAddress As String
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xSRg = Application.InputBox("Please select the original range you want to copy hyperlinks:", "KuTools For Excel", xAddress, , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    Set xDRg = Application.InputBox("Please select the new range you want to paste the hyperlinks only", "KuTools For Excel", , , , , , 8)
    If xDRg Is Nothing Then Exit Sub
    Set xDRg = xDRg(1)
    For I = 1 To xSRg.Count
        If xSRg(I) <> "" And xDRg.Offset(I - 1) <> "" Then
            If xSRg(I).Hyperlinks.Count = 1 Then
                xDRg(I).Hyperlinks.Add xDRg(I), xSRg(I).Hyperlinks(1).Address
            End If
        End If
    Next
End Sub

3. Və sonra basın F5 bu kodu çalıştırmak üçün açar, yalnız bir köprü kopyalamak istediğiniz hüceyrələri seçmenizi hatırlatmak üçün bir informasiya qutusu açılır, ekran görüntüsüne baxın:

02 başqa bir hüceyrəyə doc surətini kopyalayın

4. Və sonra basın OK, hiperlini yalnız başqa bir informasiya qutusuna yapışdırmaq istədiyiniz hüceyrələri seçin, ekran görünüşünə baxın:

03 başqa bir hüceyrəyə doc surətini kopyalayın

5. Və köprü ünvanları orijinal hüceyrələrdən lazımlı hüceyrələrə köçürüldü, ekran görünüşünə baxın:

04 başqa bir hüceyrəyə doc surətini kopyalayın

Qeyd: Bu kod, hiperlinkləri bir səhifədən istənilən başqa bir forma kopyalamanıza da kömək edə bilər.



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    iii · 18 days ago
    Doesn't work.
  • To post as a guest, your comment is unpublished.
    Liz Melbin Tejada · 4 months ago
    Love it. Thank you so muchoooo.
    Love From Dominican Republic :)
  • To post as a guest, your comment is unpublished.
    Passing Stranger · 10 months ago
    Doesn't work.
  • To post as a guest, your comment is unpublished.
    eunice · 1 years ago
    hello.. what if i want to copy the hyperlink through vlookup? i already have the formula but when i click the the hyperlink it "cannot open specied file" will appear.

    Please help me
  • To post as a guest, your comment is unpublished.
    Arpit · 1 years ago
    Hi, what if I want to copy my hyperlink from sheet A cell A5 to Sheet B cell A5?
    • To post as a guest, your comment is unpublished.
      skyyang · 1 years ago
      Hello, Arpit:

      I have updated the VBA code, now, you can apply it in two worksheets as you need. Please try it, hope it can help you!
      • To post as a guest, your comment is unpublished.
        jprasad · 1 years ago
        I want to copy links in several sheets of one file to another file