• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

" " içerisinde yazım

tamer42

Destek Ekibi
Destek Ekibi
Katılım
11 Mart 2005
Mesajlar
3,202
Excel Vers. ve Dili
Office 2013 İngilizce
<Style id="sn_info">

ifadesini kod içerisinde msgbox görüntüsü olarak almak isterken sn_info terimini değişken olarak belirtmek istedim;

Kod:
p = "sn_info"

     pm = """ & p & """
                  
        pmStyle = "<Style id=" & pm & ">"

MsgBox pmStyle

yalnız bir yerde yazım hatası yapıyorum

yardımcı olurmsunuz,

iyi çalışmaalr.
 

Ekli dosyalar

  • style2.jpg
    style2.jpg
    6.4 KB · Görüntüleme: 2
Merhaba,

Kod:
p = "sn_info"
'     pm = """ & p & """
        pmStyle = "<Style id=" & p & ">"
MsgBox pmStyle
doğru anladıysam, şeklinde deneyiniz. Kolay gelsin.
 
Merhaba,

Kod:
p = "sn_info"
'     pm = """ & p & """
        pmStyle = "<Style id=" & p & ">"
MsgBox pmStyle
doğru anladıysam, şeklinde deneyiniz. Kolay gelsin.

San Dantex verdiğiniz kodlarla

<Style id=sn_info> şeklinde geliyor,

"sn_info" başlangıç ve bitişinde " işaretleride gelmeli

<Style id="sn_info"> şeklinde olmalı.

iyi çalışmalar.
 

Ekli dosyalar

  • style3.jpg
    style3.jpg
    6.4 KB · Görüntüleme: 0
Merhaba,
pmStyle = "<Style id='" & p & "'> "

kullanarak tek tırnak içinde çıkmasını sağlayabiliriz. Çift tırnak işareti bildiğim kadarıyla yazamıyoruz.
 
Özür dilerim, bu şekilde yazabiliriz.
Kod:
pmStyle = "<Style id=" & Chr(34) & p & Chr(34) & "> "
 
Merhaba,

Alternatif.

pm = """" & p & """"

bu şekilde de olabilir. Yazdığınız koda kırmızı ilaveler. ( Bir tırnak ilave )

.
 
Çift tırnak için; Chr(34) fonksiyonunu kodlarınıza ilave ediniz.

.

Sn Ferhat teşekkürler,

chr() karakterleri konusunda tersten işlemi nasıl yapabiliriz?

" karakterinin 34 rakamına denk geldiğini öğrenmiş olduk

örnek: ° karakterinin hangi rakama denk geldiğini nasıl öğrenebiliriz?

iyi çalışmalar.
 
Selamlar,

Aşağıdaki kodu kullanabilirsiniz.

Kod:
Option Explicit
 
Sub KARAKTER_NO()
    MsgBox Asc("°")
End Sub
 
Selamlar;

Sheets("PERSONEL_DATA").Cells(sat, 13).Value = "=ETARİHLİ(H2;J2;"y")*12+ETARİHLİ(H2;$J2;"ym")+1"
şeklinde bir kod yazmak istiyorum ama yine ÇİFT TIRNAK engeli ile karşılaşıyorum.

Nasıl çözebiliriz bir yardım lütfen :(
 
Geri
Üst