VBA Celulă Activă

VBA Celulă Activă

Celula activă mijloace specifice de celule în care este activ în actualul foaia de lucru activă. De exemplu, dacă în foaia 2 este selectată celula B4 înseamnă că celula activă este B4 în foaia 2. În VBA folosim o referință a celulei active pentru a schimba proprietățile sau valorile celulei active., Sau folosim această funcție în anumite situații când trebuie să facem unele modificări în celula activă în anumite condiții care îndeplinesc cerințele.

celula activă este o proprietate în VBA. Îl folosim în diferite situații în VBA. Putem atribui valori unei celule active folosind funcția VBA Active Cell sau preluăm adresa celulei active. Ce au returnat aceste funcții? Funcția Active cell returnează proprietatea range a celulei active în foaia de lucru activă., Așa cum s-a explicat în declarația de mai sus din definiție, dacă foaia 2 este activă și celula B4 este celulă activă, funcția celulei active din VBA va prelua proprietățile intervalului celulei B4 din foaia 2.

sintaxa celulei Active în Excel vba

mai jos este sintaxa celulei Active în Excel VBA

sintaxa este utilizată pentru a atribui o anumită valoare celulei active.

Activecell.Value= " "

sintaxa va selecta valoarea sau proprietatea celulei active din foaia de lucru activă.,

Application.Activecell

Dacă avem nevoie pentru a schimba fontul de celula activă, atunci sintaxa va fi după cum urmează

Activecell.Font.(The font we want) = True

putem afișa, de asemenea, rânduri și coloane de celule activ folosind următoarea sintaxă:

Application.Activecell

Să ne folosim de mai sus sintaxa explicat în câteva exemple și să învețe cum să se joace cu celule active.Notă: Pentru a utiliza VBA, asigurați-vă că aveți fila dezvoltatorului activată din fila Fișier din secțiunea Opțiuni.,

Exemple de Excel VBA Active Cell

mai jos sunt diferite exemple de VBA active Cell în Excel:

VBA Active Cell – exemplu #1

în acest exemplu, dorim să schimbăm valoarea celulei curente cu ceva celulă. De exemplu, în foaia 1, selectați celula A2 și introduceți valoarea ca ANAND și dorim să modificăm valoarea pentru acea celulă activă ca ARAN.urmați pașii de mai jos pentru a utiliza VBA Active Cell în Excel.,

Pasul 1: Accesați fila dezvoltatorului și faceți clic pe Visual Basic pentru a deschide VB Editor.

Pasul 2: Faceți clic pe Insert tab și faceți clic pe module pentru a insera un nou modul.

Pasul 3: declarați o sub-funcție pentru a începe să scrieți codul.

Cod:

Sub Sample()End Sub

Pasul 4: Activați foaia de lucru 1 cu ajutorul funcție de mai jos.,

Cod:

Sub Sample()Worksheets("Sheet1").ActivateEnd Sub

Pasul 5: putem verifica faptul că în celula A2 din foaia 1, avem valoare ca ANAND și este celula activă.

Pasul 6: Acum utilizați următoarea instrucțiune pentru a modifica valoarea celulei active.

Cod:

Sub Sample()Worksheets("Sheet1").ActivateActiveCell.Value = "ARAN"End Sub

Pasul 7: Rula codul de mai sus de la butonul run furnizate sau apăsați F5.

putem vedea că valoarea din celula A2 a fost modificată.,

VBA Active Cell-Example #2

acum am schimbat valoarea celulei active de la ANAND la ARAN. Cum afișăm valoarea curentă a celulei active? Acest lucru vom învăța în acest exemplu.urmați pașii de mai jos pentru a utiliza VBA Active Cell în Excel.pasul 1: Accesați fila dezvoltatorului și faceți clic pe Visual Basic pentru a deschide VB Editor.

Pasul 2: în același modul declarați o sub-funcție pentru a începe să scrieți codul.

Cod:

Sub Sample1()End Sub

Pasul 3: Activați foaia de lucru 1 cu următorul cod.,

Cod:

Sub Sample1()Worksheets("Sheet1").ActivateEnd Sub

Pasul 4: Acum lasă-ne să selectați celula activă cu următorul cod.

Cod:

Sub Sample1()Worksheets("Sheet1").ActivateSet selectedCell = Application.ActiveCellEnd Sub

Pasul 5: Acum, să ne afișa valoarea din celula selectată cu următorul cod.

Cod:

Sub Sample1()Worksheets("Sheet1").ActivateSet selectedCell = Application.ActiveCellMsgBox selectedCell.ValueEnd Sub

Pasul 6: Rula codul de mai sus prin apăsarea tastei F5 sau cu butonul run furnizate și vizitați următorul rezultat.,

celula activă a fost A2 și are valoarea ca ARAN, astfel încât proprietatea afișată este ARAN.

VBA Active Cell-Example # 3

să schimbăm fontul celulei A2 care a fost celula selectată. Să facem fontul ca îndrăzneț. Inițial, nu a fost selectat niciun font.pentru aceasta, urmați pașii de mai jos pentru a utiliza VBA Active Cell în Excel.pasul 1: Accesați fila dezvoltatorului și faceți clic pe Visual Basic pentru a deschide VB Editor.

Pasul 2: în același modul declarați o sub-funcție pentru a începe să scrieți codul.,

Cod:

Sub Sample2()End Sub

Pasul 3: să activăm mai întâi foaia de lucru pentru a utiliza celula activă.

Cod:

Sub Sample2()Worksheets("Sheet1").ActivateEnd Sub

Pasul 4: lasă-ne Să schimba fontul de celule selectate cu următorul cod.

Cod:

Sub Sample2()Worksheets("Sheet1").ActivateActiveCell.Font.Bold = TrueEnd Sub

Pasul 5: Rula codul de mai sus prin apăsarea tastei F5 sau cu butonul run furnizate și a vedea rezultatul.

fontul celulei active este schimbat cu caractere aldine.,

VBA Active Cell-exemplu #4

acum vrem să știm în ce rând sau în ce coloană se află celula activă în prezent. Cum să facem acest lucru este ceea ce vom învăța în acest exemplu.pentru aceasta, urmați pașii de mai jos pentru a utiliza VBA Active Cell în Excel.pasul 1: Accesați fila dezvoltatorului și faceți clic pe Visual Basic pentru a deschide editorul VB.

Pasul 2: în același modul declarați o sub-funcție pentru a începe să scrieți codul.

Cod:

Sub Sample3()End Sub

Pasul 3: să activăm mai întâi foaia de lucru pentru a utiliza proprietățile celulei active.,

Cod:

Sub Sample3()Worksheets("Sheet1").ActivateEnd Sub

Pasul 4: Acum vom selecta celula activă cu următorul cod.

Cod:

Sub Sample3()Worksheets("Sheet1").ActivateSet selectedCell = Application.ActiveCellEnd Sub

Pasul 5: Acum putem afișa rândul curent din celula activă cu următorul cod.

Cod:

Sub Sample3()Worksheets("Sheet1").ActivateSet selectedCell = Application.ActiveCellMsgBox selectedCell.RowEnd Sub

Pasul 6: putem obține, de asemenea, coloana curenta de celulă activă cu următorul cod.,

Cod:

Sub Sample3()Worksheets("Sheet1").ActivateSet selectedCell = Application.ActiveCellMsgBox selectedCell.RowMsgBox selectedCell.ColumnEnd Sub

Pasul 7: Acum apăsați F5 sau butonul run cu condiția de a rula codul de mai sus și a vedea următorul rezultat.

rezultatul de mai sus a fost rândul celulei active. Apăsați ok pentru a vedea coloana celulei active.

lucruri de reținut

există câteva lucruri pe care trebuie să le amintim despre celula activă din VBA:

• celula activă este celula activă sau selectată în orice foaie de lucru.
• putem afișa sau modifica proprietățile adresei celulare active în VBA.,
• pentru a utiliza proprietățile celulei active, trebuie să activăm mai întâi foaia de lucru curentă.

Articole recomandate

acesta a fost un ghid pentru Excel VBA Active Cell. Aici am discutat despre modul de utilizare a proprietății VBA active Cell pentru a atribui valoare sau pentru a prelua adresa celulei active în Excel împreună cu câteva exemple practice și șablonul excel descărcabil. De asemenea, puteți parcurge și alte articole sugerate –

1. VBA IFError
2. VBA XML
3. VBA Paste
4. VBA RGB