- Katılım
- 3 Haziran 2009
- Mesajlar
- 11
- Excel Vers. ve Dili
- 2003
Selamlar;
Arkadaşlar forumda daha önce yayınlanmış örneklere bakarak bir form hazırladım. Access formumdaki değerleri word şablonuna yapıştırıyorum.
Kullandığım kod ise;
.Goto what:=wdGoToBookmark, Name:="İSİM"
.TypeText [İsim Soyad]
Fakat burada şöyle bir şey yapmak istiyorum.
Access tablomdaki [İsim Soyad] hücresi değeri eğer "None" ise word'e "none" olarak yazmasın boş bırakıp geçsin.
Bunun için denediğim formül;
.Goto what:=wdGoToBookmark, Name:="İSİM"
If [İsim Soyad] <> Value = "None" Then
.TypeText [İsim Soyad]
Else
.TypeText ("")
End If
Fakat bu kod çalışmıyor.
Kodun neresinde hata yapmış olabilirim yardımcı olursanız sevinirim
Arkadaşlar forumda daha önce yayınlanmış örneklere bakarak bir form hazırladım. Access formumdaki değerleri word şablonuna yapıştırıyorum.
Kullandığım kod ise;
.Goto what:=wdGoToBookmark, Name:="İSİM"
.TypeText [İsim Soyad]
Fakat burada şöyle bir şey yapmak istiyorum.
Access tablomdaki [İsim Soyad] hücresi değeri eğer "None" ise word'e "none" olarak yazmasın boş bırakıp geçsin.
Bunun için denediğim formül;
.Goto what:=wdGoToBookmark, Name:="İSİM"
If [İsim Soyad] <> Value = "None" Then
.TypeText [İsim Soyad]
Else
.TypeText ("")
End If
Fakat bu kod çalışmıyor.
Kodun neresinde hata yapmış olabilirim yardımcı olursanız sevinirim