Ayuda Código al Guardar Excel
Este Código
Sub guardarhoja()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Sheets("Ajuste").Copy
With Application.FileDialog(msoFileDialogSaveAs)
.Title = "Guardar archivo como"
.AllowMultiSelect = False
.InitialFileName = mes
.FilterIndex = 1
If .Show Then
march = .SelectedItems(1)
ActiveWorkbook.SaveAs Filename:=march
ActiveWorkbook.Close
End If
End With
Application.ScreenUpdating = True
Application.DisplayAlerts = True
mira que me guarda Con todo y macros y como tengo estas formulas
=SI(INDIRECTO("Hoja2!B3")=0;"";INDIRECTO("Hoja2!B3"))
Cuando Abro el Archivo guardado me Sale #REF todo
;(
1 respuesta
como le harías tu.. Tengo un base de datos que es alimentada Con el formulario.. que te había enviado..
Tengo un formato.. de Cuadros con logos.. Ya esta listo..
Como le harías tu para llenar Este formato con los valores Dela Base de datos
¿Pero qué tiene que ver el llenar la base con el guardar como?
O ya me perdí, jeje
Aver loq ue busco es guardar el formato.. que esta alimentado con la BD..que Es digitada Con el Formulario.. jajajaja..
(por que no puedo alimentar de una vez el formato..?? por que tiene celdas Combinadas.. es por eso al intenrar copiar dato en celda combinada me lo descuadra
Tengo que ver el archivo, me explicas con comentarios cómo lo tienes y cómo quieres el resultado.
No olvides poner tu usuario en el asunto
Me surgió una idea
Como copiarías tu Texbox1 al
a las Celdas AB2
Por que están Combinadas ???
como se copia de Texbox1 Cedas Combiandas
Sólo pasa el textbox a la primer celda combinada, si están combinas por ejemplo b3 y b4, pones así range("B3") = textbox1
