Jump to content

Jose BN

Members
  • Content Count

    219
  • Joined

  • Last visited

  • Days Won

    9

Jose BN last won the day on November 26 2020

Jose BN had the most liked content!

About Jose BN

  • Rank
    Advanced Member
  • Birthday 09/12/1980

Profile information

  • Gender
    Hombre
  • Localización:
    Costa Rica

Converted

  • Campos
    ;
  • Mi versión de Excel:
    4,5

Recent Profile Visitors

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

  1. Buenas noches!Amig@s del foro espero se encuentren muy bien! quisiera solicitarles el apoyo con lo siguiente, tengo un problema con el siguiente código (adjunto) con este lo que se pretende es insertar la formula buscarv en las celdas de las columnas(A,B,C,D,F) en base al valor de la lectura de código de barras (TxtCodigodeBarras_) del formulario (fmrfact) y este valor es colocado a partir del rango G16 hacía abajo. El ingreso de lector del código de barras parece trabajar bien, pero al querer insertar las formulas para traer los datos de este código solamente lo hace con la fila 16, los valor
  2. Muchas gracias!!! Por compartir @LeandroA
  3. A guardar Gasolina, @Gerson Pineda!!! Saludos
  4. Cómo ya te lo ha indicado @Gerson Pineda debes cambiar en esta la línea o bien eliminar esto Application.Visible = True
  5. Gracias al foro hermano "todoexcel" y @Héctor Miguel se logró el propósito! https://foro.todoexcel.com/threads/borrar-modulo-trabajando-con-proyecto-protegido.55439/#post-236663 Comparto igual la solución por posible consulta similar: Option Private Module Const clave As String = "aBc" Const esteLibro As String = "delete vbacode (exceluciones).xlsm" Sub quitaPassWordVBA() Unload UserForm1 Application.SendKeys "%{f11}{l 4}%q", True Workbooks(esteLibro).Activate Application.SendKeys "%{f11}^r{down}" & clave & "~%q", True Application.OnTime Now, "limpiamodulo2" En
  6. @MauriciodeAbreu gracias sinceramente por compartir tu aporte, te comento que estoy tratando de encontrar una opción que no requiera digitar contraseña ya que tengo definido cuales son los módulos que deseo borrar. Saludos cordiales JB
  7. Buenas tardes, Amig@s del foro quisiera solicitarles el valioso apoyo con la siguiente consulta: como lograr eliminar un modulo por medio de macro cuando el proyecto se encuentra protegido? he revisado que utilizando la siguiente instrucción se elimina el modulo pero si el proyecto no está protegido en su acceso a vba: ThisWorkbook.VBProject.VBComponents("Módulo1").CodeModule.DeleteLines 1, ThisWorkbook.VBProject.VBComponents("Módulo1").CodeModule.CountOfLines En el archivo adjunto he insertado un botón en la hoja que llama al formulario, dentro del formulario he agregado otro bot
  8. @tupy77 en buena hora! se vale haber leído tu post! José
  9. Hola! Prueba: Workbooks("BOOK1.XLS").Close ThisWorkbook.Close Saludos
  10. @paikerr Me parece recordar que trabaja desde la versión 2007 Saludos
  11. howling Solo debes dar clic sobre este mismo, ahí escribes el código de la macro y todo debe andar bien. Saludos
  12. A ver si es lo que buscas: Dim Resp As Byte Resp = MsgBox("La información suministrada es correcta? Deseas continuar con la ejecución ?", _ vbQuestion + vbYesNo, "ExcelJB") If Resp = vbYes Then MsgBox "Se eligió continuar...", vbExclamation, " ExcelJB " 'Aquí se ejecutaría el código MsgBox "Proceso realizado de forma exitosa!", , "Administrador" Else MsgBox "Se eligió cancelar...", vbCritical, " ExcelJB " End If Saludos J
  13. Silvia Creo que itz tiene razón en parte de no funcionar lo que le indicas, esto porque ella debe notar que la forma como se visualizan los datos no es la misma como esta definido en la celda, lo que significa que lo que se busca no es exactamente lo mismo (en cuanto a los datos con los que se cuenta), p.e esto puede ser algun espacio o caracter no visible a simple vista. Esto puede suceder cuando se extraen datos desde la web, esta es una posible razón para que una busqueda o las funciones de busquedad no encuentren el dato. Por ejemplo si buscas 5/1/2020 se posicionará donde encont
  14. Te podrá ayuda en algo: http://www.cpearson.com/excel/unselect.aspx
×
×
  • Create New...

Important Information

Privacy Policy