Access - Para Enrique: Operaciones con Carpetas

Hola Enrique... antes que nada queria agradecerte por tu ayuda con la base de ejemplo de operaciones con Carpetas.
Pero me gustaría preguntarte como debo hacer para lograr que el archivo que voy a exportar se guarde en la carpeta que seleccione?
La verdad que he probado y no le doy en la tecla.
Gracias de Antemano!
Saludos
Sandra!

El código que me diste me quedó así:

*****************************************************
Private Sub Alternar30_Click()

Dim ShellPath As String
ShellPath = BrowseForFolder(Me.Hwnd, "Seleccione directorio para guardar el archivo ...")
If ShellPath <> "" Then
Carpeta = Mid(ShellPath, 1, Len(ShellPath) - 1)
Me.Requery

Dim CliName As String

CliName = TmpCuenta & " - Acta de Compensacion " & NumYanioActa & ".doc"

If MsgBox("Se Creará un Archivo de Word con el nombre: " & vbCrLf & _
CliName, vbInformation + vbOKCancel, "Exportar Acta y Anexo") = vbOK Then
DoCmd.OpenReport "Acta_y_Anexo", acPreview
DoCmd.OutputTo acReport, "Acta_y_Anexo", "RichTextFormat(*.rtf)", CliName, False, ""
DoCmd.Close acReport, "Acta_y_Anexo"
End If
'Carpeta.SetFocus
Else
'Carpeta.SetFocus
End If
End Sub

Hola Sandra:

Solo te falta poner ANTES de CliName la variable Carpeta a la que previamente le has dado valor al seleccionarla con el BrowseForFolder, quedando la línea del OutputTo, así:

DoCmd.OutputTo acReport, "Acta_y_Anexo", "RichTextFormat(*.rtf)", Carpeta & "/" & CliName, False, ""

Fíjate que donde pongo una barra inclinada a la derecha ( / ) entre Carpeta y CliName, tu tienes que poner la barra inclinada a la izquierda; yo la he puesto así porque he observado que en este Foro no aparecen las barras inclinadas a la izquierda y puedes creer que van dos dobles comillas juntas, cuando entre ellas debe ir la barra que separa la carpeta del Archivo en la Ruta.

Otra cosa. Me parece que no es necesario abrir antes el Informe, porque veo que lo abres en vista previa, exportas el archivo y luego lo cierras ¿ y eso para qué ?

Saludos
Enrique

Enrique .... MIL GRACIAS!!!! funcionó a la perfección!!!!
Ademas tenes razón en que abria el reporte antes de exportarlo ....innecesariamente.
Te mando un fuerte abrazo y gracias totales nuevamente.
Sandra!