Merhabalar, bir link listesi yapıyorum ve bu link listesi ile beraber Excel'de DA ve PA değerlerini de göstermek istiyorum. A sütununda linkler var diyelim. B sütununa da DA değerlerini, C sütununa ise PA değerini koymak istiyorum. Bunu yapmanın bir yolu var mıdır? Yardımcı olabilecek varsa çok sevinirim. Teşekkürler.

Excel Bilen Arkadaşlar, Buyrun Konuya

27-09-2024, 18:44:36

#1

Psyduck

Kurumsal PLUS

Merhabalar,

bir link listesi yapıyorum ve bu link listesi ile beraber Excel'de DA ve PA değerlerini de göstermek istiyorum.

A sütununda linkler var diyelim. B sütununa da DA değerlerini, C sütununa ise PA değerini koymak istiyorum.

Bunu yapmanın bir yolu var mıdır?

Yardımcı olabilecek varsa çok sevinirim. Teşekkürler.

27-09-2024, 18:48:59

ChatGPT rahatlıkla yapabilir hocam, deneyin isterseniz:

Geliştirici sekmesinde Visual Basic butonuna tıklayın.

Ekle > Modül seçeneğine tıklayarak yeni bir modül oluşturun ve aşağıdaki kodu yapıştırın:

Sub GetDAandPA() Dim cell As Range
Dim URL As String
Dim DA As Double
Dim PA As Double

' Linklerin bulunduğu A sütununu belirtin
For Each cell In Range("A1:A10") ' A1'den A10'a kadar olan hücreler
URL = cell.Value

' Moz API kullanarak DA ve PA değerlerini al
' Burada API anahtarınızı ve kullanıcı adınızı kullanın
' Bu kısımda gerekli kodu eklemelisiniz.

' Örnek değerler
DA = 30 ' Örnek DA değeri
PA = 40 ' Örnek PA değeri

' Değerleri B ve C sütununa yaz
cell.Offset(0, 1).Value = DA
cell.Offset(0, 2).Value = PA
Next cell
End Sub

Kodu Çalıştırın:

Kodu kaydedin ve çalıştırmak için F5 tuşuna basın.

27-09-2024, 18:49:58

Psyduck

Kurumsal PLUS

kalipsotr adlı üyeden alıntı: mesajı görüntüle

ChatGPT rahatlıkla yapabilir hocam, deneyin isterseniz:

Geliştirici sekmesinde Visual Basic butonuna tıklayın.

Ekle > Modül seçeneğine tıklayarak yeni bir modül oluşturun ve aşağıdaki kodu yapıştırın:

Sub GetDAandPA() Dim cell As Range
Dim URL As String
Dim DA As Double
Dim PA As Double

' Linklerin bulunduğu A sütununu belirtin
For Each cell In Range("A1:A10") ' A1'den A10'a kadar olan hücreler
URL = cell.Value

' Moz API kullanarak DA ve PA değerlerini al
' Burada API anahtarınızı ve kullanıcı adınızı kullanın
' Bu kısımda gerekli kodu eklemelisiniz.

' Örnek değerler
DA = 30 ' Örnek DA değeri
PA = 40 ' Örnek PA değeri

' Değerleri B ve C sütununa yaz
cell.Offset(0, 1).Value = DA
cell.Offset(0, 2).Value = PA
Next cell
End Sub

Kodu Çalıştırın:

Kodu kaydedin ve çalıştırmak için F5 tuşuna basın.

Hocam ben DA ve PA sorgusunu da sistemden yapıp otomatik yazmasını istiyorum

29-09-2024, 09:01:56

#4

fatiheryildiz

Psyduck adlı üyeden alıntı: mesajı görüntüle

Hocam ben DA ve PA sorgusunu da sistemden yapıp otomatik yazmasını istiyorum

Bunu yapmanın yolu selenyum ile birlikte önce sorguları yaptırıp arkasından listeyi oluşturmak lazım..

Yolu selenyum sorgusu.. Selenyum ve makro biliyorsanız yaparsınız 4 veya 5 saatte sistemi yaparsınız.. Aksi takdirde biraz uzun iş, yanlış anlamayan konuya rastgele geldim ama dilerseniz ücretli olarak destek sağlayabilirim..