Dante Amor

Puedes explicarlo con varios ejemplos

Sustituye todo tu código por lo siguiente: '************************macro que busca por rango de fecha al cliclar el boton2 ************************ Private Sub CommandButton2_Click() 'Act Por Dante Amor If TextBox2.Value = Empty Or TextBox3.Value =...

Puedes poner una imagen con datos reales de lo que tienes y en otra imagen el resultado que esperas. Procura que en la imágenes se vean las filas y las columnas de la hoja de excel. Después explica qué es lo que necesitas.

Con el formato condicional puede quedar así: En la fórmula puedes poner: =$A3>VALOR("02:00") En se aplica a: También en el formato condicional, lo puedes hacer directamente en Aplicar formato únicamente a las celdas que contengan Y en se aplica a:...

Revisa el siguiente artículo: https://www.gerencie.com/enviar-correos-con-condicion-desde-outlook-con-excel.html

En qué momento las quieres bloquear y ocultar. Si la hoja está oculta y en la macro utilizas algo como sheets("Hoja1"). Select, entonces te va a enviar error. Si la hoja está bloqueada y quieres escribir en la hoja, entonces te va a enviar error,...

Te anexo la macro Sub Negativos() For i = 1 To Range("G" & Rows.Count).End(xlUp).Row If UCase(Cells(i, "G").Value) = "A" Then Range("B" & i & ":E" & i).Value = Evaluate("-1 * " & Range("B" & i & ":E" & i).Address()) End If Next End Sub [sal u dos

Pon lo siguiente en tu form1 Private Sub CommandButton1_Click() 'validar acceso ' 'aquí tu código para validar ' 'si fue exitoso el acceso 'Para agregar el usuario a la hoja usuario Set h = Sheets("usuario") u = h.Range("A" &...

Esto es lo que está pasando. En los textbox, como su nombre lo indica, son cajas de texto, entonces en las cajas tienes los textos 11, 10 y 11 En tu operación pones esto: Mmed1 = (med11 + med12 + med13) / 3 Pero como los textbox contienen texto, lo...

Con esta instrucción te muestra la ventana de impresoras: Private Sub Tick2_Click() Load Ticket22 ImpresoraActual = Application.ActivePrinter 'te da escoger impresora Application.Dialogs(xlDialogPrinterSetup).Show Ticket22.PrintForm...