Šajā rakstā mēs parādīsim, kā lietotājam pievienot RefEdit vadīklu un izmantot šūnu diapazonu.
Šajā piemērā mēs esam izveidojuši izcelšanas lietotāja formu, kuru varam izmantot, lai izceltu šūnu diapazonu ar dzeltenu krāsu.
Mēs esam paņēmuši datu paraugus, kas sastāv no komandas locekļa vārda un pieteikšanās stundas.
RefEdit pievienošana lietotāja formā
Pievienojiet lietotāja veidlapu, noklikšķiniet uz RefEdit vadīkla rīkjoslā un izvēlieties un nometiet vadīklu lietotāja veidlapā.
Loģisks skaidrojums
Lai iezīmētu šūnu, noklikšķiniet uz pogas Marķieris. Tas atvērs lietotāja veidlapu. Atlasiet diapazonu, izmantojot RefEdit. Lai atlasītu šūnas, noklikšķiniet uz domuzīmes zīmes.
Lai atlasītu blakus esošās šūnas, pārejot uz citu šūnu, nospiediet taustiņu Shift. Lai atlasītu šūnas, kas nav blakus, nospiediet vadības taustiņu, vienlaikus atlasot dažādas šūnas. Atlasītās šūnas ieskauj punktētas līnijas, un lodziņā parādīsies šūnu adrese.
Nospiežot pogu Labi, atlasītās šūnas tiks iezīmētas dzeltenā krāsā. Noklikšķiniet uz pogas Labi noklikšķināt uz notikuma, un tajā ir VBA kods atlasīto šūnu izcelšanai.
Lūdzu, sekojiet tālāk norādītajam kodam
Opcija Explicit Sub darbojas () UserForm1.Show End Sub 'Pievienot zemāk esošo kodu lietotāja veidlapas pogai "Ok" Opcija Explicit Private Sub CommandButton1_Click () Dim SelectRange As Range Dim Adrese1 Kā virkne ieslēgta kļūda GoTo Last' Saņemiet adresi no RefEdit vadības adreses1 = RefEdit1.Value 'Iestatiet SelectRange Range objektu diapazonā, kas norādīts vadīklā RefEdit Set SelectRange = Range (Address1)' Iezīmējiet atlasīto diapazonu dzeltenā krāsā SelectRange.Interior.Color = RGB (255, 255, 0) ' userform. Unload Me Last: End Sub
Ja jums patika šis emuārs, kopīgojiet to ar saviem draugiem Facebook. Varat arī sekot mums Twitter un Facebook.
Mēs labprāt uzklausītu jūsu viedokli, dariet mums zināmu, kā mēs varam uzlabot savu darbu un padarīt to labāku jums. Rakstiet mums e -pasta vietnē