- Katılım
- 27 Mayıs 2007
- Mesajlar
- 149
- Excel Vers. ve Dili
- Türkçe
bu konu ile ilgili birkaç örnek var, hepsini denedim ama olmadı.
benim sorunum şu. A tablosundan "ADI, SOYADI, TELEFON ve ADRESİ" verilerini B tablosuna
DoCmd.GoToControl "ADI"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable "TAYİNOLANPERSONEL", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "TAYİNOLANPERSONEL", acLast
DoCmd.GoToControl "ADI"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "TAYİNOLANPERSONEL"
' SOYADI
DoCmd.GoToControl "SOYADI"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable "TAYİNOLANPERSONEL", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "TAYİNOLANPERSONEL", acLast
DoCmd.GoToControl "SOYADI"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "TAYİNOLANPERSONEL"
' TELEFON
DoCmd.GoToControl "TELEFON"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable "TAYİNOLANPERSONEL", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "TAYİNOLANPERSONEL", acLast
DoCmd.GoToControl "TELEFON"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "TAYİNOLANPERSONEL"
' ADRESİ
DoCmd.GoToControl "ADRESİ"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable "TAYİNOLANPERSONEL", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "TAYİNOLANPERSONEL", acLast
DoCmd.GoToControl "ADRESİ"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "TAYİNOLANPERSONEL"
şeklinde kopyalıyorum. A tablosundaki "TELEFON" alanı boş olduğunda doğal olarak kopyalama yapmıyor ve sonraki kopyalama olan "ADRESİ" kopyalamasına geçmiyor. Alan boş olduğunda sonraki kopyalama işlemine nasıl devam eder. Şimdiden teşekkürler.
benim sorunum şu. A tablosundan "ADI, SOYADI, TELEFON ve ADRESİ" verilerini B tablosuna
DoCmd.GoToControl "ADI"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable "TAYİNOLANPERSONEL", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "TAYİNOLANPERSONEL", acLast
DoCmd.GoToControl "ADI"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "TAYİNOLANPERSONEL"
' SOYADI
DoCmd.GoToControl "SOYADI"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable "TAYİNOLANPERSONEL", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "TAYİNOLANPERSONEL", acLast
DoCmd.GoToControl "SOYADI"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "TAYİNOLANPERSONEL"
' TELEFON
DoCmd.GoToControl "TELEFON"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable "TAYİNOLANPERSONEL", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "TAYİNOLANPERSONEL", acLast
DoCmd.GoToControl "TELEFON"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "TAYİNOLANPERSONEL"
' ADRESİ
DoCmd.GoToControl "ADRESİ"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable "TAYİNOLANPERSONEL", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "TAYİNOLANPERSONEL", acLast
DoCmd.GoToControl "ADRESİ"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "TAYİNOLANPERSONEL"
şeklinde kopyalıyorum. A tablosundaki "TELEFON" alanı boş olduğunda doğal olarak kopyalama yapmıyor ve sonraki kopyalama olan "ADRESİ" kopyalamasına geçmiyor. Alan boş olduğunda sonraki kopyalama işlemine nasıl devam eder. Şimdiden teşekkürler.