ABRIR DOC DO WORD DENTRO DO FORMULARIO

USUARIO.EXCLUIDOS 27/08/2007 14:42:29
#232871
Caros amigos,

estou precisando abrir um documento do word, ate ai tudo bem, mas eu gostaria de abrir esse doc dentro de um formulario.

Ex. Formulario1 (dentro desse formulario, eu teria talvez um Picture para nesse Picture aparecer o doc do Word). Isso seria possivel ?

Aguardo respostas dos amigos. Obrigado.
SERGIO.CARDOSO 27/08/2007 14:58:38
#232881
Duas ideias:
1) Coloque um Objeto OLE no form;
2) Ou, coloque um botao que abre o Word especialmente para o doc que voce precisa ( ou que esta numa textbox ).
USUARIO.EXCLUIDOS 27/08/2007 15:00:25
#232883
Desculpa, mas nao entendi.

Eu consigo abrir o Doc do word a partir do formulario, mas nao dentro do formulario.
Teria como fazer isso?
Obrigado.
SERGIO.CARDOSO 27/08/2007 15:14:15
#232886
Faca um teste, coloque um botao Command1 e o codigo ...

Private Sub Command1_Click()
Shell "C:\Arquivos de programas\Microsoft Office\Office10\Winword c:\MeuDoc.doc, vbNormalFocus"
End Sub


Altere a pasta do seu word e a pasta do documento que voce quer abrir.
SILVERDRAGON 27/08/2007 15:37:58
#232907
Aqui amigo...peguei aqui no site msm... Porem ele carrega em uma listbox q tbm é uma boa.........


''Carregando um arquivo texto para um ListBox

[c]Private Sub AbreArquivo()
  Dim sArquivo As String, sLinha As String
  Dim iARQ As Integer
  sArquivo = App.Path & "SEUTEXTO.'doc"
  If Right$(App.Path, 1) <> "\" Then
    sArquivo = App.Path & "\SEUTEXTO.doc"
  End If

  'Verificando se o arquivo existe:
  If Dir$(sArquivo) = "" Then
    'O arquivo NÃO existe.
    MsgBox "O arquivo não existe!", vbExclamation, _
           "ATENÇÃO!!!"
    Exit Sub
  End If
  iARQ = FreeFile
  Open sArquivo For Input As iARQ

  'Verificando se o arquivo está em branco:
  If LOF(iARQ) = 0 Then
    'O arquivo está em branco.
    MsgBox "O arquivo está em branco!", vbExclamation, _
           "ATENÇÃO!!!"
    'Fecha o arquivo
    Close iARQ
    Exit Sub
  End If

  'Limpa o ListBox:
  List1.Clear
  Do While Not EOF(iARQ) 'Enquanto ñ chegar ao fim do arq...
    'Pega a linha atual:
    Line Input #iARQ, sLinha

    'Adiciona-a no ListBox:
    List1.AddItem sLinha
  Loop

  'Fecha o arquivo
  Close iARQ
End Sub

''
''
''Detalhe, você deverá mudar "MeuTexto.TXT" para o nome do arquivo que você deseja abrir e "List1" para o nome do ListBox onde as linhas serão adicionadas.[/c]


T+
MADMAX 27/08/2007 16:11:48
#232929
Amigo ai algumas dicas

http://www.macoratti.net/dica29.htm

mas como o amigo SERGIO CARDOSO disse acima


1) Coloque um Objeto OLE no form;

e so usar o objeto no seu formulario que funciona
USUARIO.EXCLUIDOS 27/08/2007 16:24:28
#232938
mas como uso o Objeto Ole no form ?
Obrgiado.
SERGIO.CARDOSO 27/08/2007 16:45:15
#232954
1) Clique na caixa de ferramentas e escolha OLE;
2) Coloque no seu form;
3) Vai abrir uma tela Inserir Objeto, clique em Criar do Arquivo;
4) Clique em procurar e va na pasta onde esta o seu arquivo .doc;
5) execute o projeto...
USUARIO.EXCLUIDOS 27/08/2007 16:50:55
#232956
Eu preciso exibir este doc toda vez que ele for atualizado.

Ex.: Dependo de atualizar dados no Formulario para depois abrir este doc ja atualizado. E pelo que conseguir, ele ja mantem o arquivo unico, nao tem como pegar essa atualização.

Teria como ?

Obrgiado.
USUARIO.EXCLUIDOS 27/08/2007 17:10:47
#232958
Acho que ficou mal explicado:
Eu so preciso vizualizar o doc dentro do formulario, nao abrir um documento do word.

Obrgiado.
USUARIO.EXCLUIDOS 27/08/2007 17:26:41
#232965
Niguem !?!?
Página 1 de 2 [15 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar