carlos moraes

' Compactar una base de datos con ADO Dim sDBTmp As String Dim je As JRO.JetEngine On Error GoTo ErrCompactar Set je = New JRO.JetEngine ' Crear un nombre "medio" aleatorio sDBTmp = "D:\SG RADIO\DBT_Datos_SGR_v2.mdb" ' Asegurarnos de que no existe...

drago MD respondió: [Buenas joven. El sistema antivirus que viene de fabrica con windows, es decir Defender, es igual que no tener ninguna protección, esto lo menciono por experiencia en más de 20años con equipos. La recomendación es, tener instalado el Malwarebytes,...

Ejemplo: en la celda A1 con formato porcentaje sin decimales tienes 75%, en B1 debes escribir 8:20 por ejemplo representando 8horas con 20min, en C1 realiza la multiplicación A1*B1 te dará como resultado 6:15, ¿ese no es el resultado que esperas?

'Updateby Extendoffice 20161215 Dim xRg As Excel.Range Dim wSh As Excel.Worksheet Dim wBk As Excel.Workbook Set wSh = ActiveSheet Set wBk = ActiveWorkbook Application.ScreenUpdating = False For Each xRg In wSh.Range("A1:A7") With wBk .Sheets.Add...

Private Sub CommandButton1_Click() ' MsgBox " PASO 1 EN ESTE PASO TOMA LOS VALORES DE LA HOJA 3 EN EL RANGO A2:A366 Y LOS PEGA EN LA HOJA AUTOMATIZACION EN EL RANGO A1" Sheets("Hoja3").Select Worksheets("Hoja3").Range("A2:A366").Select Selection.Copy...

Manda el código a [email protected] para hecharte una mano

https://docs.microsoft.com/en-us/office/troubleshoot/count-cells-number-with-color-using-vba buenas noches alli le dejo un link que trata el tema si hay mas dudas no llena sus dudas mademe un ejemplo y le respondere a la brevedad posible

Crea una variable dim nombrecliente as string Envía a nombrecliente el valor de la celda donde se maneja el nombre de cliente ejemplo celda a2 cells(2,1).value nombrecliente = activesheets.cells(2,1).value agrega esa variable e tu codigo ChDir...