Entrada reservas hoteles: Crear formulario para rellenar distantas hojas según fechas.

He creado una hoja de Excel para gestionar las reservas de un hotel pequeño. El documento consta de 31 hojas, que coinciden con los días del mes en las que tengo información de cada habitación y reservas.

Me gustaría crear un formulario donde entrar la información de una nueva reserva que introdujera automáticamente los datos en las distintas hojas según fechas de entrada y salida del cliente.

Agradecería mucho vuestra ayuda pues soy novato en la utilización de macros.

1 Respuesta

Respuesta
1

En mi pagina www.programarexcel.blogspot.com encontrTextBox1_Change()
Range("a2").Select
ActiveCell.FormulaR1C1 = TextBox1
End Sub
Private Sub TextBox2_Change()
Range("b2").Select
ActiveCell.FormulaR1C1 = TextBox2
End Sub
Private Sub TextBox3_Change()
Range("c2").Select
ActiveCell.FormulaR1C1 = TextBox3
End Sub
Private Sub TextBox4_Change()
Range("d2").Select
ActiveCell.FormulaR1C1 = TextBox4
End Sub
Private Sub TextBox5_Change()
Range("e2").Select
ActiveCell.FormulaR1C1 = TextBox5
End Sub

Cierra la pregunta o repregunta, gracias. Visita www.programarexcel.blogspot.com ahí encontrarás macros que puedes descargar y aplcar a tu proyecto.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Desbordamiento en Macro

Solicito de su colaboración para saber por qué al ejecutar esta macro me arroja error en la linea que aparece subrayada y con negrita. Mil gracias por su oportuna y pronta colaboración. Beatriz Private Sub CommandButton1_Click() Rem inserta un...
1 respuesta

Insertar datos mediante un textbox

Soy nuevo en esto de las macros y seguramente mi pregunta sea muy básica pero no encuentro la solución... Tengo una hoja con una base de datos de cinco campos. Los datos los quiero insertar mediante textbox. He hecho un formulario con cinco textbox...
1 respuesta

Introducir datos a celdas mediante formularios

Estaba viendo tu página y tengo la siguiente duda, tengo archivo excel con columnas ya definidas con encabezados, quiero introducir datos mediante un formularios, hice un macro introduce los datos en cada celda pero le doy grabar y da inserta un fila...
1 respuesta

Como mirar la información de una celdaen un textbox

Soy yo de nuevo La situación es la siguiente: estoy trabajando en un formulario "Userform1", tengo un textbox llamado "textbox7_Change()" y una hoja llamada "VENTA", en la hoja hay una celda "c9" que tiene una fórmula. Deseo que el al momento de...
1 respuesta

Impedir textbox vacíos en userform

Mi problema es que tengo un userform que copia los datos de los textbox a celdas de una hoja de excel, y que al apretar un botón, ejecuta una macro usando esos datos, pero si dosn textbox en concreto no está lleno antes de apretar el botón, el...
1 respuesta

Actualizar caption de label con valor de celda

Tengo un userform que copia los valores introducidos en los textbox a celdas de una hoja. El problema es que la introducir un dato en el textbox3, la hoja devuelve un valor (nombre de producto) en otra celda de esa hoja. Necesito que antes de...
1 respuesta

Macro para bajar renglones

Me podrías ayudar con una macro que realize la siguiente función: Tengo un useform que pone datos en la celdas, y le hice un botón de aceptar, lo que quiero que haga ese botón es que me pocisione en la siguiente celda, por ejemplo: Escribo datos en...
2 respuestas

Generar un folio automático al ingresar datos en excel mediante un formulario.

Tengo un pequeño problemita para generar un folio consecutivo, ingreso datos en el excel mediante un formulario, los datos se van agregando en la fila 4 en la ultima celda que es la L4 se agrega la fecha en automático al ingresar el ultimo dato del...
1 respuesta

Error 13 en tiempo de ejecución no coinciden los tipos excel

Tengo un UF que me saca un error que realmente no he podido descifrar. No me deja cargar la userform y cuando ejecuto el botón1 me genera un error al poner los datos en la base de datos . Código Ption Explicit Private Declare Function FindWindow Lib...
1 respuesta

Si se deja un Textbox en blanco

Tengo este código en un formulario de excel: Private Sub TextBox1_Change() largo_entrada = Len(Me.TextBox1) Select Case largo_entrada Case 2 Me.TextBox1.Value = Me.TextBox1.Value & "/" Case 5 Me.TextBox1.Value = Me.TextBox1.Value & "/2008"...
2 respuestas