Changinf número recorde (dblink) com uma macro Keaven Boies - 06-11-2009
Olá !
Estou construindo as páginas que eu só tenho de mudar o Número recorde Alguns modelos de texto.
Existe alguém que sabe como fazer isso com uma macro.
Agora, Estou a fazê-lo manualmente, mas é muito longo !
Re: Changinf número recorde (dblink) com uma macro Erik Hammack - 06-12-2009
Chyronduetdesigners aderir ao grupo no Yahoo e faça o download do dblinkfortheblind macros. Soa como você deseja que esta não.
Tente este, Tenho presente a partir do yahoo grupos que funciona bem Shawn Humphrey - 06-17-2009
Esta macro pressupõe várias coisas: Primeiro desligado, Sua base está armazenada a página 501. Que toma então a gravar campos em seu banco de dados e avanços nesse sentido o número da mensagem. Que se repetirá e construir páginas até chegar a "fazer até messagenumber» localização. Todas estas coisas podem ser alterados na macro. Você pode adicionar e excluir modelos na macro dependendo de quantos dblink-ed modelos são, na sua mensagem.
Dim messagenumber
Dim recordnumber
Messagenumber = 502
Recordnumber = 2
Fazer até messagenumber = 506
Lyric.Mensagem 501
Lyric.Ler
Conjunto Templatep = activecanvas.Cena.Selectedtemplate (0)
Templatep.Setactive
Templatep.Dblink.Recordnumber = recordnumber
Conjunto Templatep = activecanvas.Cena.Selectedtemplate (1)
Templatep.Setactive
Templatep.Dblink.Recordnumber = recordnumber
Conjunto Templatep = activecanvas.Cena.Selectedtemplate (2)
Templatep.Setactive
Templatep.Dblink.Recordnumber = recordnumber
Conjunto Templatep = activecanvas.Cena.Selectedtemplate (3)
Templatep.Setactive
Templatep.Dblink.Recordnumber = recordnumber
Conjunto Templatep = activecanvas.Cena.Selectedtemplate (4)
Templatep.Setactive
Templatep.Dblink.Recordnumber = recordnumber
Conjunto Templatep = activecanvas.Cena.Selectedtemplate (5)
Templatep.Setactive
Templatep.Dblink.Recordnumber = recordnumber
Conjunto Templatep = activecanvas.Cena.Selectedtemplate (6)
Templatep.Setactive
Templatep.Dblink.Recordnumber = recordnumber
Lyric.Mensagem messagenumber
Lyric.Record
Messagenumber = messagenumber + 1
Recordnumber = recordnumber + 1
Loop
