Excel, Error 1004 Método Select de la Clase Range
Solicito su colaboración con el error mencionado.
En la hoja FormularioREM tengo unos textbox y un botón.
Tengo el siguiente código que busca en la hoja "BD PDM" el item de la columna A y de acuerdo a ello debe llenar los textbox. Pero en la línea: Columns("B:B").Select me sale el error
Private Sub btnBuscaPDMREM_Click()
'Busca Registro en la BD
Dim RegistroBuscarPDM As String
RegistroBuscarPDM = txbBuscaPedidoMaterialREM.Value
Sheets("BD PDM").Select
Columns("B:B").Select
Selection.Find(What:=RegistroBuscarPDM, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
'llena los TextBox
txbIngenieroResidenteREM.Value = ActiveCell.Offset(0, 2)
txbCodigoProyectoREM.Value = ActiveCell.Offset(0, 1)
1 Respuesta
I. Hola Compañero, en mi caso no he logrado encontrar una información específica pero sí creo aproximada, tal vez de valor mientras un experto o experta en Excel le contesta, serían los siguientes enlaces. Tambien, en caso de no llegar respuestas, podría dirigir su pregunta a compañeros de la sección. Ánimo.
Error 1004 en tiempo de ejecución: Error en el método Subtotal de la clase Range.
http://excelgali.foroactivo.com/t1228-por-favor-que-rayos-pasa-con-este-codigo-vba-vs-macro
https://ayudaexcel.com/foro/topic/37397-error-1004-error-en-el-metodo-select-de-la-clase-range/
https://ayudaexcel.com/foro/topic/3001-solucionado-error-en-el-metodo-select-de-la-clase-range/
Error en el metodo Select de la clase Range?
https://ayudaexcel.com/foro/topic/10253-error-en-el-m%C3%A9todo-select-de-la-clase-range/
Hola Adri, gracias por los aportes, revisaré los link para aprender sobre el error.
sin embargo en el foro de Microsoft Community, uno de los mejores expertos Héctor Miguel me explica el porque sucede el error (en mi caso específico) y me lo ayudó a corregir. te comparto la respuesta para que esta aporte a tus dificultades. saludos..
****
Héctor Miguel respondió a tu pregunta Error 1004 - "Error en el método select de la clase range"
1) es un botón ActiveX incrustado en la hoja de cálculo (por lo tanto...)
2) el control "asume" que toda referencia a rangos NO "calificada" ES "de su misma hoja"
3) cambia la instrucción:
de: => Columns("B:B").Select
_a: => ActiveSheet.Columns("b:b").Select
I. Hola Compañero, muchísimas gracias por ofrecernos este aporte, será de gran utilidad para tratar futuras consultas de este tipo.
También me alegro mucho de que haya podido solucionar su duda y siento no haber acertado.
