1

He estado revisando el foro pero no consigo solucionar mi problema Estoy usando Access 2013, en un formulario pulso un botón para verifican el spelling y la gramática de un campo. Para ello uso el verificador de Word. La verificación funciona correctamente. Pero una vez cerrado Word, Access queda en la barra de tareas parpadeando, y tengo que pulsar en el para que se abra y poder seguir trabajando. Quiero que Access se abra automáticamente. He intentado activarlo usando Hwnd, SetForegroundWindow y otro montón de cosas que he visto en el foro, pero nada funciona.

El codigo es:

Private Sub Comando2_Click()

Dim objWord As Word.Application
Dim doc As Word.Document

accessid = GetCurrentProcessId
accesshwnd = Application.hWndAccessApp

Set objWord = CreateObject("Word.Application")

With objWord
       Set doc = .Documents.Add
       .Selection.Text = Me.Texto0
       docum = doc & " - Word"
       .Visible = True
       VBA.AppActivate (docum)
       .Visible = False
       .Dialogs(wdDialogToolsSpellingAndGrammar).Show
       If Len(.Selection.Text) <> 1 Then
          Me.Texto0 = .Selection.Text
'          spellcancell = False
       Else
'          spellcancell = True
       End If
       doc.Close wdDoNotSaveChanges
    .Quit
End With

Set objWord = Nothing

AppActivate (accessid)
SetForegroundWindow accesshwnd


End Sub

Gracias por anticipado por vuestra ayuda Saludos

7
  • Estás en Stack Overflow en español. Haz clic en editar y traduce tu pregunta al castellano o terminará cerrada. Commented el 17 feb. a las 9:44
  • perdon, lo cambio
    – Luisja
    Commented el 17 feb. a las 11:31
  • 1
    Una aclaración importante: Stack Overflow en español NO es un foro, es un sitio de Preguntas y Respuestas (Q&A), por lo tanto funciona diferente a como lo hace un foro, ya que aquí no debatimos o hacemos hilos, aquí respondemos preguntas bien formuladas. Hago esta acotación para que no pienses que vas a interactuar aquí como lo harías en un foro. Puedes hacer el recorrido de bienvenida para que comprendas cómo funciona este sitio. Commented el 17 feb. a las 12:31
  • Entiendo que ejecutas este código desde Access, te abre Word, hace lo que tiene que hacer y cierra Word pero "no vuelve" a Access como tal. En ese caso, mira este comando a ver si es lo que necesitas
    – Esei
    Commented el 21 feb. a las 19:40
  • Gracias @Esei, lo que esntiendes es correcto, pero el comando que propones lo probé y no hace lo esperado. tambien probé con restore y algun otro y no lo solucionan
    – Luisja
    Commented el 24 feb. a las 11:26

0

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge you have read our privacy policy.

Examina otras preguntas con la etiqueta o formula tu propia pregunta.