Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

Problemas con Worksheet_Change

L

Lacayo

Active member
Registrado
23 Jul 2019
Mensajes
213
Hola a todos

Estoy con un proyecto en el que quiero seleccionar varias celdas de forma automática.
La idea es que al poner una "X" (la X siempre marca el lugar), por ejemplo, en la celda A9 se...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí
 

Adjuntos

Solución
F
Hola,

Te envío el código modificado

Saludos

Código: 
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

    Application.EnableEvents = False
    
    On Error Resume Next
    Application.ScreenUpdating = False
    
    
    Dim tCharcuteria As Range, sMarca$, sArticulo$, sFecha$, x%
    
    Set tCharcuteria = Hoja1.Range("T_Charcuteria")
    
    If Intersect(Target, Range("T_Charcuteria[SEL]")) Is Nothing Then Exit Sub
    
        sMarca = Target
        sArticulo = Target.Offset(0, 1)
        sFecha = Target.Offset(0, 3)
    
    
        'MsgBox (sMarca & " " & sArticulo & " " & sFecha)
        'Stop ' si no lo paro me voy al bucle infinito
        
    For x = 1 To tCharcuteria.Rows.Count
    
        If...
Ordenar por fecha Ordenar por votos
Hola,

Te envío el código modificado

Saludos

Código: 
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

    Application.EnableEvents = False
    
    On Error Resume Next...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí
 
Voto a favor 0 Voto en contra
Solución

Adjuntos

Voto a favor 0 Voto en contra
Iniciar sesión o registrarme para responder aquí.

Temas similares

E
  • Pregunta Pregunta
Hola amigos tengo un problemas con mi macros
Respuestas
3
EmmanuellPaulino
E
M
  • Resuelto
Problemas con 2 ListBox
Respuestas
8
Miltiño
M
M
  • Pregunta Pregunta
Problemas con una macro
Respuestas
7
DiegoPC
D
E
  • Resuelto
Problemas al cargar imagen a un formulario
Respuestas
2
ELVIS VASQUEZ MEZA
E
E
  • Resuelto
Problemas para filtrar tablas
Respuestas
4
ELVIS VASQUEZ MEZA
E
E
  • Resuelto
Problemas con formatos al grabar un formulario
Respuestas
4
ELVIS VASQUEZ MEZA
E
J
  • Resuelto
Problemas Con Código VBA
Respuestas
4
jeseteran100
J
E
  • Resuelto
Problemas al abrir userform
Respuestas
7
ELVIS VASQUEZ MEZA
E
R
  • Pregunta Pregunta
problemas con el evento Workbook_BeforeClose
Respuestas
7
Abraham.Valencia
Abraham.Valencia
D
  • Pregunta Pregunta
Problemas con fechas con el comando =hoy en macros
Respuestas
3
Leopoldo Blancas
L
Volver
Arriba