Andy Machin

Prueba así: Range("C6:C" & Range("C" & Rows.Count).End(xlUp).Row).Select Andy

Parece que ya te pudieron ayudar

Así: Dim wb As Workbook For Each wb In Application.Workbooks If wb.Name = "Detalle_Diario.xlsx" Then Application.DisplayAlerts = False ActiveWorkbook.Close False Application.DisplayAlerts = True End If Next wb Andy

Editar -> Preferencias: General Cambia el selector de colores de Windows a Adobe. Yo lo tengo en ingles, es donde dice "Color Picker" Andy

Si no pones una imagen del error o el código que causa el error, sera imposible ayudarte.

No necesitas una macro para eso, a menos que haya "algo más" detrás de tu pregunta, pero con la información que das, tan simple como colocar un formato a la columna o celda. El formato seria el siguiente: 0#-##-###### Video demo: PARTE 1: Demo 1.mp4...

A mí personalmente no me queda claro que intentas hacer, me parece que veo código repetido, también creo que el bucle podría mejorarse. ¿Puedes explicar cual es tu intención y como están estructurados los datos en la hoja?

Si explicas la lógica detrás del procedimiento, que significa cada cosa y cual es el objetivo que deseas conseguir, tal vez sea mejor para nosotros confeccionar un código más limpio.

Ah te había respondido en la otra parte, recordé una manera sencilla de hacerlo, un poco rustica, le queda espacio para mejorar, pero por ahora esto te puede funcionar: Private Sub Listbox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer,...

En un modulo pega el siguiente código: Private Sub runModificar() MsgBox "Ejecutando 'Modificar'" End Sub Private Sub runEliminar() MsgBox "Ejecutando 'Eliminar'" End Sub Private Sub ClickDerecho() Application.CommandBars("Cell").Reset Dim cbc As...