Fernando MG

Quiero cerrar la aplicación mediante un formulario, es por ello que he establecido que se abra un formulario cuando presiono la X de la esquina superior derecha del libro: Private Sub Workbook_BeforeClose(Cancel As Boolean) If Cancel = 0 Then...

¿Es posible obtener mediante una macro el nombre de la red WIFI a la que estoy conectado actualmente?

Tengo una macro que hace un efecto internitente en un label: Dim n As Integer Dim m As Integer c = 0 Repetir: For i = 1 To 2000 VBA.DoEvents Next i c = c + 1 If c = 1 Then Controls("Label" & X).BackColor = vbYellow If c = 2 Then Controls("Label" &...

Tengo un formulario con 75 label, cada uno tiene un nombre diferente (Caption). Tengo un botón que me devuelve uno de esos nombres al azar. Si el nombre que dicho botón me devuelve es, por ejemplo, B10, entonces solo el Label que tiene ese nombre se...

Cómo podría ajustar la macro para que me muestre en el label de un userform, con un tiempo de retraso de menos de 1 segundo, cada dato que encuentre en el recorrido de celdas de una hoja, . La aplicación Wait retrasa 1 segundo como mínimo. Private...

¿Cuál es el código para saber el número de fila y columna de una imagen activa?.

¿Me podrían ayudar con el código para eliminar solo la imagen de la celda activa?

Tengo esta macro: Private Sub TextBox1_KeyDown(ByVal Keycode As MSForms.ReturnInteger, ByVal Shift As Integer) If Keycode = 13 Then Me.ListBox1.AddItem Me.TextBox1.Text TextBox1 = Empty TextBox1.SetFocus End If End Sub El asunto es que al presionar...

Esto es lo que quiero hacer El valor a buscar se obtiene del textbox de un formulario. Este valor deberá buscarse en la columna B de mi hoja. La Condición es que el dato de la Columna G debe contener la fecha de actual. Con el primer valor que cumpla...

Tengo un combobox en cual que se despliegan los meses (ENERO, FEBRERO, ..., DICIEMBRE). El encabezado de cada columna de mi hoja a partir del rango "D1" hasta "ND1" es un mes. Deseo que al seleccionar un mes del combobox, oculte todas las columnas...