AccessTr.neT
Ad Tanımlamayı Formüle Aktarmak İçin Macro İle Bilgiyi Yapıştırmak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Ad Tanımlamayı Formüle Aktarmak İçin Macro İle Bilgiyi Yapıştırmak (/konu-ad-tanimlamayi-formule-aktarmak-icin-macro-ile-bilgiyi-yapistirmak.html)

Sayfalar: 1 2

Ad Tanımlamayı Formüle Aktarmak İçin Macro İle Bilgiyi Yapıştırmak - yyhy - 12/10/2023

Ad tanımlamayı formüle aktarmak için macro ile bilgiyi yapıştırmak istiyorum.
Macro hazırladım ama eksik oldu. Tamamlayamadım. Yardımcı olabilecek arkadaşlara teşekkür ederim.

RE: Ad Tanımlamayı Formüle Aktarmak İçin Macro İle Bilgiyi Yapıştırmak - atoykan - 16/10/2023

Örneğinizin içinde "Macro ile D31 hücresindeki bilgiyi kopyalayıp A33 hücresine = işareti koyup kopyalanan değeri yapıştırıp enter yapmasını istiyorum." şeklinde belirttiğiniz husus ise probleminiz aşağıdaki kodu deneyin
Sub DgrAta()

    Range("D31").Copy

    Range("A33").PasteSpecial Paste:=xlPasteValues

    Application.CutCopyMode = False

    dgr = Range("a33").Text

    Range("A33").FormulaR1C1 = "= " & dgr

End Sub


RE: Ad Tanımlamayı Formüle Aktarmak İçin Macro İle Bilgiyi Yapıştırmak - feraz - 16/10/2023

Formula2 burdaki 2 yi silebilirsinizde.

PHP Kod:
Sub test()
    With ThisWorkbook.Worksheets("Ad Tanýmlama Deðer Getirme")
        .Range("A33").Formula2 = "=" & .Range("D31").Value2
    End With
End Sub 


RE: Ad Tanımlamayı Formüle Aktarmak İçin Macro İle Bilgiyi Yapıştırmak - yyhy - 18/10/2023

(16/10/2023, 17:41)feraz yazdı: Formula2 burdaki 2 yi silebilirsinizde.

PHP Kod:
Sub test()
    With ThisWorkbook.Worksheets("Ad Tanýmlama Deðer Getirme")
        .Range("A33").Formula2 = "=" & .Range("D31").Value2
    End With
End Sub 

Sayın @feraz bey makroda hata verdi acaba ne yapmalıyım?
Sayın @atoykan bey ilginiz için teşekkür ederim. Kod çalışıyor.

RE: Ad Tanımlamayı Formüle Aktarmak İçin Macro İle Bilgiyi Yapıştırmak - atoykan - 18/10/2023

Rica ederiz iyi çalışmalar.

RE: Ad Tanımlamayı Formüle Aktarmak İçin Macro İle Bilgiyi Yapıştırmak - feraz - 18/10/2023

(18/10/2023, 11:47)yyhy yazdı:
(16/10/2023, 17:41)feraz yazdı: Formula2 burdaki 2 yi silebilirsinizde.

PHP Kod:
Sub test()
    With ThisWorkbook.Worksheets("Ad Tanýmlama Deðer Getirme")
        .Range("A33").Formula2 = "=" & .Range("D31").Value2
    End With
End Sub 

Sayın @feraz bey makroda hata verdi acaba ne yapmalıyım?
Sayın @atoykan bey ilginiz için teşekkür ederim. Kod çalışıyor.

Abey bir bakın dikkatlice hataya o zaman anlarsınız nedenini.Yinede yazayım Tr karakter  harf hatası var sayfa isminde.
Her mesajda Tr karakter harfi düzeltin yazmaktan gına gelmişti ve yazmamıştım ve zaten bekliyordum o mesajıda Img-grin