Note: The other languages of the website are Google-translated. Back to English
Logáil isteach  \/ 
x
or
x
Cláraigh  \/ 
x

or

Conas colúin a cheilt go huathoibríoch bunaithe ar dháta in Excel?

Ag ceapadh, tá raon sonraí agam i mbileog oibre, anois, ba mhaith liom na colúin a cheilt bunaithe ar dháta faoi leith go huathoibríoch. Mar shampla, nuair a iontrálann mé an dáta 5/16/2016 i gcill, ba mhaith liom na colúin a bhfuil an dáta sin níos lú ná an dáta sonrach seo a cheilt láithreach mar a thaispeántar an pictiúr a leanas. Tabharfaidh an t-alt seo roinnt cleasanna isteach chun é a réiteach.

colúin cheilt doc faoi dháta 1

Cuir colúin i bhfolach go huathoibríoch bunaithe ar dháta faoi leith le cód VBA

Folaigh colúin bunaithe ar dháta faoi leith le Kutools for Excel


mboilgeog cheart gorm saighead Cuir colúin i bhfolach go huathoibríoch bunaithe ar dháta faoi leith le cód VBA

Chun an tasc seo a chur i gcrích, b’fhéidir go gcabhróidh an cód VBA seo a leanas leat, déan mar a leanas:

1. Roghnaigh an cluaisín bileog a theastaíonn uait a cheilt de réir dáta, agus cliceáil ar dheis chun é a roghnú Féach an cód ón roghchlár comhthéacs le dul chuig an Microsoft Visual Basic d’Fheidhmchláir fuinneog, agus ansin cóipeáil agus greamaigh an cód seo a leanas sa Mhodúl:

Cód VBA: Cuir colúin i bhfolach go huathoibríoch bunaithe ar dháta faoi leith:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    Dim xCell As Range
    If Target.Address <> Range("K4").Address Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In Range("A1:I1")
        xCell.EntireColumn.Hidden = (xCell.Value < Target.Value)
    Next
    Application.ScreenUpdating = True
End Sub

colúin cheilt doc faoi dháta 2

2. Ansin sábháil agus dún an cód seo, téigh ar ais chuig an mbileog oibre, agus anois, nuair a iontrálann tú an dáta i gcill K4, cuirfear na colúin a bhfuil an dáta níos lú ná an dáta sonrach seo i bhfolach go huathoibríoch.

nótaí: Sa chód thuas, K4 an cill dáta sonrach ar mhaith leat na colúin a cheilt bunaithe ar, A1: I1 an bhfuil an dáta a d'úsáid tú sna cealla as a chéile.


mboilgeog cheart gorm saighead Folaigh colúin bunaithe ar dháta faoi leith le Kutools for Excel

Mura bhfuil tú eolach ar an gcód, seo uirlis áisiúil-Kutools le haghaidh Excel, Lena Roghnaigh Cealla Sonracha fóntais, is féidir leat an post seo a chríochnú gan stró.

Kutools le haghaidh Excel : le níos mó ná 300 breiseán áisiúil Excel, saor in aisce le triail gan aon teorannú i 30 lá. 

Tar éis a shuiteáil Kutools le haghaidh Excel, déan mar a leanas le do thoil:

1. Roghnaigh na ceanntásca dáta, agus cliceáil Kutools > Roghnaigh > Roghnaigh Cealla Sonracha, féach ar an scáileán:

2. Sa popped amach Roghnaigh Cealla Sonracha dialóg, roghnaigh Colún iomlán ó na Cineál roghnúcháin, agus ansin roghnaigh na critéir, mar shampla Níos lú ná ó na Cineál sonrach liosta anuas, agus cuir an dáta isteach sa bhosca in aice le téacs ar mhaith leat colúin a cheilt bunaithe air, féach an scáileán:

colúin cheilt doc faoi dháta 4

3. Agus ansin cliceáil Ok cnaipe, roghnaítear na colúin shonracha ar lú a dáta ná 5/16/2016 ag an am céanna, féach an scáileán:

colúin cheilt doc faoi dháta 5

4. Ansin cliceáil ar dheis ar aon cheanntásc colún roghnaithe amháin, agus roghnaigh Folaigh chun na colúin roghnaithe seo a cheilt de réir mar is gá duit. Féach an pictiúr:

colúin cheilt doc faoi dháta 6

Cliceáil Íoslódáil saor in aisce Kutools le haghaidh Excel Anois!


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíochtaí Office / Excel 2007-2019 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d’fhiontar nó d’eagraíocht. Gnéithe iomlána triail saor in aisce 30 lá. Ráthaíocht ar ais airgid 60 lá.
cluaisín kte 201905

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á!
bun officetab
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Seven · 3 years ago
    I have the same issue as Chris. The cell with my date does not always change. I need the macro to run regardless of whether the date has changed from last month or is the same as last month without having to click on the cell itself and hit enter to trigger the "Change"
  • To post as a guest, your comment is unpublished.
    Chris · 3 years ago
    Hello,
    Thanks for the code.
    In my case the cell K4 is a calculation cell from the formula =EOMONTH(A1,0). Example: A1 = 01.03.2017. K4 takes the value 31.03.2017. But the VBA code that you propose does not hide the columns until I click on K4 cell and press Enter to refresh it. I tried to add Range("K4").calculate but with no effect. Help please.