Aprendiendo VBA, ayúdame a comprenderlo traduciendo funciones al chino.

Sub?xx()?'La función de este código se basa en el valor de la celda que comienza en la segunda fila de la columna B en la tabla denominada hoja1. B en la tabla denominada hoja2 El valor de la celda que comienza en la tercera fila existe en la columna B en la hoja1, luego copie el valor de la fila correspondiente en la columna C-H en la hoja1 a la columna C-H en la hoja2

¿Dim? d?As?Object

Dim?ir,?i

Set?d?=?CreateObject("scripting.dictionary")?'Crear diccionario

Application.ScreenUpdating?=?False?' Desactivar el deslizamiento de la pantalla (principalmente para mejorar la eficiencia) ¿Activado?¿Error?¿Reanudar?¿Siguiente?'¿Omitir si hay un error

Hojas("hoja1").Seleccionar? 'Seleccione la hoja denominada hoja1

ir?=?Range("b65536").End(xlUp).Row?'El número de fila de la última fila con datos en la columna B de la hoja1 se asigna al variable ir

For?i?= ?2?To?ir d(Cells(i,?2).Value?&?"")?=?Range(Cells(i,?3), ?Cells(i,?8))?' serán de Los datos de la columna B y la columna C-H a partir de la segunda fila se cargan en el diccionario, en el que el valor de la columna B es la clave principal y no se repite

Siguiente

Hojas("hoja2").Select?'Seleccione el nombre Tabla de la hoja2

ir?=?Range("b65536").End(xlUp ).Row?'El número de fila de la última fila con datos de la columna B de la hoja2 se asigna a la variable ir

For?i?=?3?To?ir

Range(Cells(i,?3),?Cells(i,?8))?=?d(Cells(i,?2 ).Value?&?"")?'A partir de la tercera fila, si el valor de la columna B en la hoja2 es el mismo que el valor de la clave principal en el diccionario d, asigne el valor correspondiente a la clave principal a las columnas C-H

Siguiente

Application.ScreenUpdating?=?True ?'Abrir actualización de pantalla

Fin?Sub