Zgjedhja e një gamë të Excel VBA

Në disa raste, mund të dëshironi që përdoruesi të zgjedhë një gamë Excel VBA ndërsa shfaqet një kuti dialogu. Një shembull i këtij lloji të përzgjedhjes së diapazonit Excel VBA ndodh në kutinë e dialogut Krijo tabelën, e cila shfaqet kur zgjidhni Home → Fut → Tabelat → Tabela. Kutia e dialogut "Krijo tabelën" ka një kontroll përzgjedhës të diapazonit që përmban supozimin e Excel-it në lidhje me diapazonin që do të konvertohet — por ju mund ta përdorni këtë kontroll për të ndryshuar diapazonin duke zgjedhur qelizat në fletën e punës.

Për të lejuar një përzgjedhje të intervalit Excel VBA në kutinë tuaj të dialogut, shtoni një kontroll RefEdit. Shembulli i mëposhtëm shfaq një kuti dialogu me adresën e diapazonit aktual të rajonit të shfaqur në një kontroll RefEdit. Rajoni aktual është blloku i qelizave jo boshe që përmban qelizën aktive. Përdoruesi mund të pranojë ose ndryshojë këtë gamë. Kur përdoruesi klikon OK, procedura e bën intervalin të theksuar.

Zgjedhja e një gamë të Excel VBA

Kjo kuti dialogu i lejon përdoruesit të zgjedhë një gamë.

Ky shembull Excel VBA supozon sa vijon:

  • Ju keni një UserForm të quajtur UserForm1.
  • UserForm përmban një kontroll CommandButton të quajtur OKButton.
  • UserForm përmban një kontroll CommandButton të quajtur CancelButton.
  • UserForm përmban një kontroll RefEdit të quajtur RefEdit1.

Kodi ruhet në një modul VBA dhe shfaqet këtu. Ky kod bën dy gjëra: inicializon kutinë e dialogut duke caktuar adresën e rajonit aktual në kontrollin RefEdit dhe shfaq UserForm.

Sub Bold Cells ()
' Dil nëse fleta e punës nuk është aktive
  Nëse TypeName(ActiveSheet) <> "Worksheet" Pastaj Dilni Sub

' Zgjidhni rajonin aktual
  ActiveCell.CurrentRegion.Zgjidh

' Inicializoni kontrollin RefEdit
  UserForm1.RefEdit1.Text = Zgjedhja.Adresa

' Shfaq dialogun
  UserForm1.Trego
Fundi Nën

Procedura e mëposhtme ekzekutohet kur klikohet butoni OK. Kjo procedurë bën një kontroll të thjeshtë gabimesh për t'u siguruar që diapazoni i specifikuar në kontrollin RefEdit është i vlefshëm.

Nën Private OKButton_Click()
  Në gabim GoTo BadRange
  Range(RefEdit1.Text).Font.Bold = True
  Shkarko UserForm1
  Dilni Nën
Gama e keqe:
  MsgBox "Sfera e specifikuar nuk është e vlefshme."
Fundi Nën

Nëse ndodh një gabim në Excel VBA (ka shumë të ngjarë një specifikim i pavlefshëm i diapazonit në kontrollin RefEdit), kodi kalon në etiketën BadRange dhe shfaqet një kuti mesazhi. Kutia e dialogut mbetet e hapur në mënyrë që përdoruesi të mund të zgjedhë një gamë tjetër.

Nëse marrja e një diapazoni të zgjedhur nga përdoruesi është i vetmi funksion i kryer nga Forma juaj e Përdoruesit, mund t'i thjeshtoni gjërat duke përdorur metodën Application InputBox.

Leave a Comment

Si të shkruani shënime në OneNote 2013 në Android

Si të shkruani shënime në OneNote 2013 në Android

Mësoni si të shkruani shënime në OneNote 2013 në Android me krijimin, hapjen dhe regjistrimin e shënimeve. Aplikoni strategji efektive për menaxhimin e shënimeve tuaja.

Formatimi i numrave në një varg teksti në Excel

Formatimi i numrave në një varg teksti në Excel

Mësoni si të formatoni numrat në një varg teksti në Excel për të përfshirë informacione të sakta dhe tërheqëse për raportet tuaja.

Si të fshini qelizat dhe të dhënat në Excel 2010

Si të fshini qelizat dhe të dhënat në Excel 2010

Në Excel 2010, fshini të dhënat apo formatin e qelizave lehtësisht me disa metoda të thjeshta. Mësoni si të menaxhoni përmbajtjen e qelizave me opsione të ndryshme.

Formatimi i elementeve të grafikut të Excel 2007

Formatimi i elementeve të grafikut të Excel 2007

Zhvilloni aftësitë tuaja në formatimin e elementeve të grafikut në Excel 2007 përmes metodave të thjeshta dhe efikase.

Si të rreshtoni dhe justifikoni tekstin në Word 2010

Si të rreshtoni dhe justifikoni tekstin në Word 2010

Mësoni se si të rreshtoni dhe justifikoni tekstin në Word 2010 me opsione të ndryshme rreshtimi dhe justifikimi për të përmirësuar formatimin e dokumenteve tuaja.

Excel 2019: Si të krijoni makro Excel për të automatizuar komandat

Excel 2019: Si të krijoni makro Excel për të automatizuar komandat

Mësoni si të krijoni makro në Excel 2019 për të automatizuar komandat dhe thjeshtuar detyrat tuaja.

Si të përdorni vizoren për të vendosur skeda në Word 2016

Si të përdorni vizoren për të vendosur skeda në Word 2016

Mënyra vizuale dhe e shpejtë për të vendosur një ndalesë skedash në Word 2016 është përdorimi i vizores. Zbulo disa këshilla dhe truke për përdorimin e skedave në këtë program.

Formatimi i boshtit X dhe boshtit Y në grafikët e Excel 2007

Formatimi i boshtit X dhe boshtit Y në grafikët e Excel 2007

Mësoni si të formula boshtet X dhe Y në Excel 2007, duke përfshirë mundësitë e ndryshimit të formatimeve për grafikët e ndryshëm.

Statistika të thjeshta në analizën e të dhënave në Excel

Statistika të thjeshta në analizën e të dhënave në Excel

Eksploroni se si Excel mund t

Gjetja dhe zëvendësimi i të dhënave në Excel 2007

Gjetja dhe zëvendësimi i të dhënave në Excel 2007

Mësoni se si të përdorni veçorinë Find and Replace të Excel 2007 për të gjetur dhe zëvendësuar të dhëna në mënyrë efikase. Kjo udhëzues është e përshtatshme për të gjithë përdoruesit që dëshirojnë të rrisin produktivitetin e tyre.