yobert

Arturo. El problema se debe a los siguiente: No están activados algunas referencias de la biblioteca de VB. Las puedes activar en el menú herramientas /Referencias. Microsoft Office 12.0 Object Library. Microsoft Office Excel 12.0 Object Library....

Me encantaría poder ayudarte, pero aun no logro entender tu premisa: Si tenemos el siguiente rango de datos. A B C Ensayo Fecha Observaciones Ensayo1 30/08/2010 No se ha producido ningún fallo Ensayo2 30/10/2010 Todo correcto... Lo que quiero es que...

Debes especificar que el tipo de dato donde vas almacenar las fechas es de tipo Date. Por ejemplo: Dim Fecha as Date A continuación, si nos damos cuenta, el tipo de dato que almacenas en cada celda es un cadena de caracteres de tipo String, por lo...

Recibe mis cordiales saludos, distes un buen paso, que es la importación de datos, ahora lo que necesitas es solo filtrar los datos de acuerdo al ruc que ingreses, para que automáticamente te aparezcan los datos en las hojas respectivas, esto es...

Ante todo recibe mis cordiales saludos, disculpas por las demoras del caso, estoy tratando de resolver varias inquietudes de diferentes usuarios, es por eso te pediría si serias tan amable de poder enviar tu archivo, para poder hacer las correcciones...

Recibe mis cordiales saludos, con respecto a tu interrogante, serias tan amable de poder enviar tu archivo para poder ayudarte, disculpas por la demora estado tratando de solucionar varios problemas de diversos usuarios que piden mi ayuda, envíamelo...

Recibe mis cordiales saludos, la linea de programación que necesitas es la siguiente: Dim min As Double Dim j As Double Sheets("Query2").Activate min = ActiveSheet.Range("A65536").End(xlUp).row For j = 0 To min If j < min Then i = j + 1 Cells(i,...

Ante todo mis cordiales saludos, lo que debes hacer es simplemente al final de tu condición: por ejemplo: Si condicion 1 then suma= suma + valor end if suma=0 De esta manera solucionar tu problema.

Buenss tardes, recibe mis cordiales saludos, te envío la fórmula que estas necesidando para evular la condion Y y la condición O. Condicion 1 Condicion 2 TablaVerdad 1 1 Conector Y (Verdadero) 0 1 Conector O(Falso) =SI(Y(B7=1,C7=1),"Conector...

El código que necesitas es el siguiente: Application.ScreenUpdating = False Lineas de instruccion.......... Application.ScreenUpdating = True Este código lo copias antes de iniciar tu procedimiento y al finalizar tu procedimiento dentro de tus...