„Excel“ - palyginkite stulpelius, kad rastumėte trūkstamus duomenis

„Microsoft Excel Office“ programinėje įrangoje yra daugybė funkcijų, kurios leidžia vartotojui kurti darbo lapus pagal jų poreikius ir reikalavimus. Makrokomandą lengva sukurti, kad palygintumėte stulpelius, kad būtų galima rasti trūkstamus duomenis „Excel“ . „Excel“ makrokomandos gali būti naudojamos skaičiavimams ir duomenų apdorojimui darbalapiuose. Nereikia rašyti „Excel“ makrokomandų, nes internete yra daug išteklių, kurie suteikia kodą makrokomandoms. Žinios apie programavimą gali būti naudingos, tačiau nėra būtina sukurti makrokomandą, kad būtų galima palyginti stulpelius, kad būtų rasti trūkstami duomenys „Excel“ darbalapiuose.

Problema

Man reikia pagalbos! Turiu du darbalapius (C & Q). Kiekviename darbalapyje yra keturios stulpeliai, kiekviena skiltis turi skirtingą informaciją (A = data, B = Misc, C = aprašymas, D = suma), tačiau abu darbo lapai yra panašūs. Bandau palyginti D stulpelį abiejose darbo lapuose, kad būtų galima rasti trūkstamus duomenis darbo lape Q.

Sprendimas

Jei makro aptinka trūkstamus duomenis, ką norite daryti su juo? Mano makro C lapo D stulpelio duomenys, kurie trūksta toje pačioje lapo Q skiltyje, bus pažymėti geltonai. Tai gali būti arba ne, ką norite daryti su trūkstamais duomenimis. Toliau pateikiamas makrokomandas. Pakeiskite jį su norimu.

Pirmiausia paleiskite makrokomandą ir peržiūrėkite lapą C, kad pamatytumėte, kas vyksta prieš makro pakeitimą:

 Sub bandymas () „Dim cfindq“ kaip diapazonas, rc kaip diapazonas, cc kaip diapazonas, x kaip dvigubas įjungtas klaidos tęsinys Kitas su darbalapiais („c“) .Cells.Interior.ColorIndex = xlNone Set rc = intervalas (. ), .Range ("d2"). Pabaiga (xlDown)) Kiekvienam cc Rc x = cc.Value su darbalapiais ("q"). Stulpeliai ("D: D") Nustatyti cfindq = .Cells.Find (ką : = x, lookat: = xlWhole) Jei cfindq nėra nieko, tada GoTo linija1 Kitas GoTo eilutė2 Pabaiga Jei baigiasi su 1 eilute: cc.Interior.ColorIndex = 6 eilutė2: Kitas cc Pabaiga su pabaiga