calvuch

Prueba así: TextBox1.MultiLine = True TextBox1 = "Cuenta: " & [a1] & Chr(13) & "Usuario: " & [a2] & Chr(13) & "Contraseña: " & [a3] Si te sirve CIERRA la pregunta

Indicame cuales son las celdas que contienen los valores que deseas mostrar en el mensaje de apertura.

Inserta este macro en un modulo: Sub borrar() Dim BorraRango As String Dim i As Long Dim fila As Integer 'Recorro verticalmente la hoja en busca de la primera fila vacía i = 2 Do While Sheets("COMPRAS").Range("A" & i) <> Empty i = (i + 1) DoEvents...

Prueba esto: Inserta un modulo en tu proyecto y en este modulo pegas este script Sub eliminar_hojas() Dim i As Integer Application.DisplayAlerts = False For i = 2 To Application.Sheets.Count Sheets(2).Select Sheets(2).Delete DoEvents Next End Sub...

Abre el editor de vba teclas ALT+F11 Desde el editor dale doble click a la hoja que contendrá en evento, en la ventana de edición pegas esto Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Address = "$E$12"...

Selecciona el rango que contiene las celdas vacías, presión F5 luego presiona el "botón especial" Selecciona la opción "Celdas en Blanco" y acepta En la hoja se han seleccionado las celdas vacías ahora debes presionar el cero 0 ( NO DES ENTER), luego...

Claro, es posible siempre y cuando tu sistema dos vuelque la info en algún archivo

Te da el error por que esta en el evento change del control, por lo cual cada pulsación de teclado es evaluada, al presionar los sepradores ya sean - o / se genera el error utiliza otro evento, tal vez el Exit de esa forma pasarias la fecha al salir...

Acá tienes como cargar el nomber de las hojas de tu libro en un control desplegable ( combo) Private Sub UserForm_Initialize() 'carga el nombre de las hojas en el combo Dim i As Integer For i = 1 To ActiveWorkbook.Sheets.Count ComboBox1.AddItem...

Veamos si tienes datos numéricos como texto y estos están "solos", es decir del tipo 1235 y no del tipo "asd1235", pues entonces esos "solos", los puedes pasar a numero sencillamente seleccionando toda la hoja, y aplicando formato de celda numérico....