Skip to main content

Conas raon a roghnú bunaithe ar luach cille i gcolún eile in Excel?

San Airteagal seo, labhróidh mé faoi conas raonta a roghnú bunaithe ar luach cille i gcolún eile. Tóg sampla, má thaispeánann na cealla BRÉAGACH i gcolún C, roghnófar na cealla coibhneasta i gcolún A agus i gcolún B mar atá thíos an pictiúr a thaispeántar. Níl aon ghné ionsuite ann a chabhróidh leat an tasc seo a réiteach, ach san alt seo, is féidir liom é a láimhseáil le cód VBA.
doc roghnaithe le colún 1 eile

Roghnaigh raon bunaithe ar luach cille i gcolún eile de réir cód VBA


mboilgeog cheart gorm saighead Roghnaigh raon bunaithe ar luach cille i gcolún eile de réir cód VBA

Roghnaigh raon bunaithe ar luach cille i gcolún eile de réir cód VBA

1. Cumasaigh an bhileog is mian leat a úsáid, agus brúigh Alt + F11 eochracha chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. cliceáil Ionsáigh > Modúil, agus ansin greamaigh thíos an cód leis an nua Modúil fhuinneog.

VBA: Roghnaigh raon bunaithe ar luach cille

Sub SelectByCellValue()
'UpdatebyExtendoffice20161128
    Dim lastrow As Long
    Dim xRg As Range, yRg As Range
    'change Sheet1 to suit
    With ThisWorkbook.Worksheets("Sheet2")
        lastrow = .Cells(.Rows.Count, "C").End(xlUp).Row
        Application.ScreenUpdating = False
        For Each xRg In .Range("C1:C" & lastrow)
            If UCase(xRg.Text) = "FALSE" Then
                If yRg Is Nothing Then
                    Set yRg = .Range("A" & xRg.Row).Resize(, 2)
                Else
                    Set yRg = Union(yRg, .Range("A" & xRg.Row).Resize(, 2))
                End If
            End If
        Next xRg
        Application.ScreenUpdating = True
    End With

    If Not yRg Is Nothing Then yRg.Select
End Sub

doc roghnaithe le colún 2 eile

3. Brúigh F5 eochair chun an VBA a rith, agus ansin roghnaíodh na raonta bunaithe ar na luachanna i gcolún C.

nótaí: sa script VBA, is é Bileog2 ainm na bileoige gníomhaí, C le fios an colún is mian leat a roghnú bunaithe ar, an A agus 2 in ("A" & xRg.Row) .Resize (, 2) le fios gur féidir leat na tagairtí a athrú de réir mar is gá duit chun dhá cholún a roghnú as colún A.

Leid. Más mian leat cealla atá cothrom le luach ar leith a roghnú go tapa, déan iarracht na Kutools a úsáid le haghaidh Excel's Roghnaigh Cealla Sonracha fóntais mar a thaispeántar sa phictiúr a leanas. Tá sé ag feidhmiú go hiomlán gan teorainn i 30 lá, íoslódáil agus triail saor in aisce anois.

roghnaigh cealla ar leith

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...

Tuairisc


Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations