Santrauka
Programoje "Microsoft Excel", galite naudoti makrokomandą susieti šalia dviejų stulpelių duomenis ir dėl stulpelį į dešinę nuo stulpelių, kuriuose yra duomenų. Šiame straipsnyje pateikiami Microsoft Visual Basic for Applications (VBA) makrokomandos (papildoma procedūra) padaryti pavyzdys.
Daugiau informacijos
"Microsoft" pateikia programavimo pavyzdžius tik, tačiau nesuteikia jokių aiškių arba numanomų garantijų. Tai apima, bet neapsiribojant, numanomas garantijas dėl perkamumo ir tinkamumo konkrečiam tikslui. Šis straipsnis parašytas galvojant, kad esate susipažinę su pateikta programavimo kalba ir įrankiais, kurie yra naudojami procedūroms kurti ir derinti. "Microsoft" palaikymo inžinieriai gali padėti paaiškindami konkrečios procedūros funkcines galimybes. Tačiau jie nekeis šių pavyzdžių, kad numatytų papildomą funkcinę galimybę arba sukurtų konkrečius jūsų reikalavimus atitinkančias procedūras.
Pavyzdys Visual Basic for Applications (VBA) makrokomandos
Sub ConcatColumns() Do While ActiveCell <> "" 'Loops until the active cell is blank. 'The "&" must have a space on both sides or it will be 'treated as a variable type of long integer. ActiveCell.Offset(0, 1).FormulaR1C1 = _ ActiveCell.Offset(0, -1) & " " & ActiveCell.Offset(0, 0) ActiveCell.Offset(1, 0).Select LoopEnd Sub
Pastaba: apie ActiveCell.Offset (0, 1). FormulaR1C1 galima pakeisti su ActiveCell.Offset (0, 1). Formulę. Jais galima lygus sėkmingai jei naudojate teksto ir skaičių tik (ne formulės). Naudojamas pirmajame pranešime R1C1 reiškia eilutės, stulpelio vieną ir yra naudojami pagalbos pavyzdžių forma.
Kaip naudoti makrokomandą, Microsoft Office Excel 2007
-
Atidarykite darbaknygę, kurioje yra duomenys.
-
Paspauskite klavišus ALT + F11 pradėti Visual Basic rengyklę.
-
Meniu Įterpti spustelėkite modulis įterpti modulį. Modulio kodas lange įveskite makrokomandą.
-
Meniu failas spustelėkite uždaryti ir grįžti į "Microsoft Excel".
-
Pasirinkite darbalapį, kuriame yra duomenys, kuriuos norite susieti.
-
Spustelėkite viršutiniame dešiniajame stulpelyje duomenų, kuriuos norite susieti. Pvz., jei langeliuose a1: A100 ir B1: B100 yra duomenų, spustelėkite B1 langelį.
-
Spustelėkite skirtuką programų kūrėjas . Jei rodomas skirtuką programų kūrėjas , atlikite šiuos veiksmus:
-
Spustelėkite "Microsoft Office" mygtuką, ir tada spustelėkite "Excel" parinktys.
-
Spustelėkite populiaru.
-
Spustelėdami pažymėkite žymės langelį juostelėje Rodyti programų kūrėjo skirtuką .
-
Spustelėkite gerai , kad uždarytumėte dialogo langą "Excel" parinktys .
-
-
Grupėje kodas spustelėkite makrokomandos .
-
Pasirinkite makrokomandą ConcatColumns, ir tada spustelėkite vykdyti.
Kaip naudoti makrokomandą, Microsoft Office Excel 2003 ir ankstesnėse "Excel"
-
Atidarykite darbaknygę, kurioje yra duomenys.
-
Paspauskite klavišus ALT + F11 pradėti Visual Basic rengyklę.
-
Meniu Įterpti spustelėkite modulis įterpti modulį. Modulio kodas lange įveskite makrokomandą.
-
Meniu failas spustelėkite uždaryti ir grįžti į "Microsoft Excel".
-
Pasirinkite darbalapį, kuriame yra duomenys, kuriuos norite susieti.
-
Spustelėkite viršutiniame dešiniajame stulpelyje duomenų, kuriuos norite susieti. Pvz., jei langeliuose a1: A100 ir B1: B100 yra duomenų, spustelėkite B1 langelį.
-
Meniu Įrankiai perkelkite pelės žymiklį ant makrokomandosir spustelėkite makrokomandos. Pasirinkite makrokomandą ConcatColumns, ir tada spustelėkite vykdyti.
Nuorodos
Jei norite gauti daugiau informacijos apie Visual Basic for Applications, spustelėkite toliau straipsnio numerį ir peržiūrėkite straipsnį Microsoft žinių bazėje:
226118 išteklių, kurie padės jums išmokti Visual Basic for Applications programavimą, sąrašas
