Ola. Estou trabalhando em um formulario e criei uma macro (de acordo com uma sugestao que vi pela internet). EM um formulario adicionei um campo (ListBox) que contem o nome de companhias. Ao clicar no nome da companhia o usuario clica no botao para exibir os dados desta companhia. Assim, no formulario, adicionei um subformulario neste subformulario que aparecerao os dados selecionados pelo usuario.
O codigo e:
Sub RefreshSubForm
Dim oForm AS OBJECT
Dim stData AS String
oForm = ThisComponent.Drawpage.Forms.getByName("MainForm")
stData = oForm.getByName("lbCoName").SelectedValue
oForm.Filter = "( ""NAME"" >= '" & stData & "')"
oForm.Reload()
End Sub
Estou em um Mac OS, versao 2011, porem, este modulo nao roda porque nao reconhece Drawpage como um comando. Nao reconhece Forms como um comando.
Algum sabe como fazer esse codigo rodar em Mac.
Obrigado,