Valor automático para una celda

Estoy construyendo una hoja, donde tu escaneas los códigos de barras de las maletas chequeadas, pero antes de comenzar a escanear debes insertar la información general del vuelo, por ejemplo Vuelo No 60, el destino y si es entrada o salida. Tengo 3 columnas donde debe aparecer esa información, me gustaría saber si tienen algún código en visual basic que cada vez que vaya escaneando automáticamente esas celdas en E, F y G asuman los valores de la información insertada previamente.

Igualmente me gustaría crear una macro que cuando termines de insertar la información copie esa información en otra hoja y limpie la hoja original para insertar los datos del siguiente vuelo.

1

1 respuesta

Respuesta
1

Pon este código en el modulo de la hoja

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ufila = Range("B" & Rows.Count).End(xlUp).Row
    Cells(ufila, 3).Value = Range("k1")
    Cells(ufila, 4).Value = Range("k2")
    Cells(ufila, 5).Value = Range("k3")
End Sub

Cambia "k1", "k2" , "k3" por tus celdas de datos, al escanear o escribir el codigo y salr de la celda se agregaran esos datos en las 3 columnas siguientes...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas