Jump to content

Leopoldo Blancas

Members
  • Content Count

    1,646
  • Joined

  • Last visited

  • Days Won

    39

Leopoldo Blancas last won the day on December 3 2019

Leopoldo Blancas had the most liked content!

About Leopoldo Blancas

  • Rank
    Advanced Member

Converted

  • Campos
    ,

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Gracias @joselica por tus buenos deseos... Y si es la mejor decisión y si no funciona no se pierde mucho pero si funciona sera otra cosa en que tengo Éxito...!!! Y "el cuerpo lo sabe" cuando necesitas otra cosa... esta decisión no esta hecha al vapor, son 5 meses que he investigado y buscado información, proveedores, costos de producción e instalación, cantidad de personal necesario, que tipo de perfil del personal, los salarios que pagare, los tipos de vehículos que necesito para transportar Material, Personal, cuanto tiempo se tarda la obra, etc, etc. Y también los cursos que necesito tomar
  2. Hola Habraham, Si, a lo mejor si con el tiempo... pero este año he medido el tiempo y en todos los foros en que estoy "pierdo" medio día y pues si no suelto esto de los foros no tendré tiempo para dedicarme a mi proyecto... Y pues la verdad prefiero emprender esta nueva empresa...!!! 😎 Gracias y Saludos.
  3. Hola @Haplox, Creo que nuestro amigo @joselica se a confundido de Post. Yo no tengo doble personalidad... Y el todos los Foros y Emails, FaceBook, Gmail, Hotmail, etc, etc.... siempre pongo Mi Nombre "Leopoldo Blancas".😎 😆😆😆 Si, seguro que si, ya que las "Memorias de Cálculo" como las nombramos acá en México, o en el Ramo Eléctrico donde me desarrollo, las hago yo 😂 y pues no tienes Fórmulas sofisticadas como las que hace Johnmpl o Silvia o @Snake o Gerson Pineda... Y pues también están hechas con la Programación que domino, a lo mejor les de un plus y les pido que me las
  4. Hola a Tod@s, Me vetaron por unos días en el foro.... y coincide con que también ya tenia pensado HOY de acabarme mis últimos 20 Centavos... a lo mejor ande solo de mirón, pero es tiempo de hacer otras cosas más interesantes para mi y ocuparme en algo, ya que me he aburrido de estar todo este año en casa sin trabajar... y pensare en que me ocupo, tengo pensado en Instalación de Celdas Solares, tomare unos cursos de capacitación para ver las leyes de permisos para instalar a Casa Habitación, Comercio e Industria, ya los he instalado pero nunca me he dedicado como empresa propia... Sal
  5. Hola, Ya que es una duda especifica... Excel no sabe que es H3 Te falto poner el Set H3 = Sheets("RESUMEN") antes de ese linea donde te da error. Saludos.
  6. Con DoEvents, y lo utilizas mucho..!!!??? ESE ESTILO DE PROGRAMACIÓN ME RECORDÓ AL VIEJO CRIPPER 5.2 allá por 1985 un domingo por la tarde...😎 DoEvents significa que haga los eventos, se utiliza para cuando tenes un ciclo do-loop, o un while-wend, o un for-next demasiado largo, eso generalmente se "adueña" del programa, agregándole una linea DoEvents en el lugar apropiado podes seguir corriendo tu aplicación sin interrupciones. EJ: Private sub Command1_Click() Dim Cont as integer For Cont = 0 to 1000 'Codigo que ejecuta el ciclo DoEvents Next cont End Sub Tienes una progr
  7. Pero si el de Soporte Técnico es @Luis paz...??? 🤣🤣🤣
  8. Subelo a Google Drive, o a OneDrave o..... y Compartes el Link de tu Archivo... Puedes compartir un archivo de 1 Tera...😂😂😂
  9. Hola, Claramente los For son de 5 a 23, no puede ejecutar el 24, eso nunca lo hace.... SE TE ACABARON TUS 20 CENTAVOS. Suerte.
  10. Hola, No puedo seguir tu código... A lo mejor en tu cabecita esta claro, pero para mi no. Si te fijas en este código al final siempre va a quedar filtrado por la columna 23, y no me queda claro el propósito de ello. Y no se como salen las cantidades de la fila 9... Si podrías explicarlo paso por paso lo que haces o quieres hacer? Seria de gran ayuda, para gastar estos últimos 20 centavos que me quedan... NOTA: DONDE DA ERROR LA MACRO SUSTITÚYELO POR: If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData Saludos
  11. Hola, Gastando mis últimos 20 centavos... No entiendo lo que quieres hacer con la macro, a lo mejor tienes código innecesario, con esos datos en otra hoja pon como quieres que sea el resultado a mano... Ya que tu macro esta hecha camotes... Por ejemplo tienes este código: For H = 5 To 23 aCol = Array("E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y") For t = LBound(aCol) To UBound(aCol) LE = aCol(t) 'MsgBox LE For n = j To 23 If n = j The
  12. Hola joselica, Te voy a dar los pasos para Modificar... 1.- Lo Buscas en la hoja DB y lo presentas en tu hoja Ficha. 2.- Haces las modificaciones pertinentes en la Hoja Ficha 3.- Al presionar el boton Modificar tiene que llevar los datos de la Hoja Ficha a DB 4.- E AQUÍ EL PROBLEMA, lo que debes hacer es: Confundes los valores que estas obteniendo, Usa otras variables diferentes al nombre de las hojas. Tienes en tu Macro: Set H1 = Sheets("FICHA") Set H2 = Sheets("BD") Set H3 = Sheets("RESUMEN") Set FICHA = H2.Columns("B") Set BD = FICHA.Find(H
  13. Sube otro Nuevo Post para que ALGUIEN TE AYUDE. Saludos.
×
×
  • Create New...

Important Information

Privacy Policy