Note: The other languages of the website are Google-translated. Back to English

Sut i restru'r holl ddyddiadau rhwng dau ddyddiad yn Excel?

Mewn rhai achosion, os oes gennych y dyddiad cychwyn penodol a'r dyddiad gorffen, efallai y bydd angen i chi restru'r holl ddyddiadau rhwng y ddau ddyddiad penodol hyn yn Excel. Nawr mae'r tiwtorial hwn yn siarad am y dulliau i restru'r holl ddyddiadau rhwng dau ddyddiad yn Excel.

Rhestrwch yr holl ddyddiadau rhwng dau ddyddiad yn ôl fformwlâu

Rhestrwch yr holl ddyddiadau rhwng dau ddyddiad yn ôl VBA

Rhestrwch yr holl ddyddiadau rhwng dau ddyddiad gan Kutools ar gyfer Excel syniad da3


Yma, rwy'n cyflwyno fformwlâu a all restru'r holl ddyddiadau rhwng dau ddyddiad penodol i chi yn Excel yn gyflym.

1. Teipiwch y dyddiadau cychwyn a gorffen yn ddwy gell, dyma fi'n eu teipio i mewn i gell A1 ac A2. Gweler y screenshot:
doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-1

2. Yna ewch i gell C1 i deipio'r fformiwla hon = A1 + 1 i mewn iddo, yna cliciwch Rhowch allwedd. Gweler y screenshot:
doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-2

3. Yna yng nghell C2, teipiwch y fformiwla hon =IF($A$1+ROW(A1)>=$A$2-1,"",C1+1) i mewn iddo, yna llusgwch y handlen autofill i lawr i'r celloedd nes bod cell wag yn ymddangos. Gweler sgrinluniau:

doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-3       doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-4

Yna gallwch weld bod yr holl ddyddiadau rhwng dau ddyddiad penodol wedi'u rhestru yn y golofn.
doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-5

Nodyn:

Yn y fformwlâu uchod, A1 yw'r dyddiad cychwyn, A2 yw'r dyddiad gorffen, a C1 yw'r dyddiad cyntaf ymhlith yr ystod dyddiad.


Os oes gennych ddiddordeb mewn cod macro, gallwch ddefnyddio'r VBA isod i restru'r holl ddyddiadau rhwng dau ddyddiad penodol yn Excel.

1. Teipiwch y dyddiad cychwyn a'r dyddiad gorffen rydych chi'n ddwy gell, dyma fi'n teipio cell A1 a B1. Gweler y screenshot:
doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-6

2. Gwasgwch Alt + F11 allweddi i agor Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

3. Yna cliciwch Mewnosod > Modiwlau a chopïo a gludo islaw cod VBA i'r popping Modiwlau ffenestr.

VBA: Rhestrwch yr holl ddyddiadau rhwng dau ddyddiad.

Sub WriteDates()
	'Updateby20150305
	Dim rng As Range
	Dim StartRng As Range
	Dim EndRng As Range
	Dim OutRng As Range
	Dim StartValue As Variant
	Dim EndValue As Variant
	xTitleId     = "KutoolsforExcel"
	Set StartRng = Application.Selection
	Set StartRng = Application.InputBox("Start Range (single cell):", xTitleId, StartRng.Address, Type: = 8)
	Set EndRng   = Application.InputBox("End Range (single cell):", xTitleId, Type: = 8)
	Set OutRng   = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
	Set OutRng   = OutRng.Range("A1")
	StartValue   = StartRng.Range("A1").Value
	EndValue     = EndRng.Range("A1").Value
	If EndValue - StartValue <= 0 Then
		Exit Sub
		End If
		ColIndex = 0
		For i = StartValue To EndValue
			OutRng.Offset(ColIndex, 0) = i
			ColIndex = ColIndex + 1
		Next
	End Sub

4. Cliciwch Run or F5 i redeg y VBA, ac mae deialog yn galw allan i chi ddewis y dyddiad cychwyn, yna cliciwch OK, yna dewiswch y dyddiad gorffen yn yr ail ymgom popio. Gweler y screenshot:

doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-7          doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-8

5. Cliciwch OK, yna dewiswch gell i roi'r dyddiadau allan, ac yna cliciwch OK. Nawr gallwch weld bod yr holl ddyddiadau rhwng dau ddyddiad wedi'u rhestru. Gweler sgrinluniau:

doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-9         doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-10

Nodyn: Mae'r rhestr a gynhyrchir gan y VBA hwn yn cynnwys y dyddiad cychwyn a'r dyddiad gorffen.


A dweud y gwir, os gwnaethoch chi osod Kutools ar gyfer Excel - teclyn ychwanegu defnyddiol, gallwch hefyd ddefnyddio'r Mewnosod Data ar Hap i ddatrys y broblem hon.

Kutools ar gyfer Excel, gyda mwy na 300 swyddogaethau Excel defnyddiol, gwella'ch effeithlonrwydd gweithio ac arbed eich amser gweithio.

Ar ôl gosod am ddim Kutools ar gyfer Excel, gwnewch fel y nodir isod:

1. Dewiswch golofn rydych chi am restru dyddiadau rhwng dau ddyddiad, a chlicio Kutools > Mewnosod > Mewnosod Data ar Hap. Gweler y screenshot:
mewnosod data ar hap 1

2. Yna yn y Mewnosod Data ar Hap deialog, cliciwch dyddiad tab, yna dewiswch y dyddiadau cychwyn a gorffen o'r O ac To rhestr, yna cofiwch wirio Diwrnod gwaith, penwythnos ac Gwerthoedd Unigryw blychau gwirio. Gweler y screenshot:
doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-12

3. Cliciwch Ok i gau'r ymgom, ac un arall Kutools ar gyfer Excel deialog pops allan, cliciwch Oes. Yna gallwch weld bod y dyddiadau rhwng y dyddiad cychwyn a'r dyddiad gorffen wedi'u rhestru. Gweler sgrinluniau:

doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-13           doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-14

4. Nawr mae angen i chi ddidoli'r rhestr ddyddiadau mewn trefn sydd ei hangen arnoch chi. Cliciwch Dyddiad > Trefnu Hynaf i'r Newyddaf. Yna gallwch weld bod y dyddiadau'n cael eu didoli o'r dyddiad hynaf i'r dyddiad mwyaf newydd. Gweler sgrinluniau:

doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-15          doc-rhestr-pob-dyddiad-rhwng-dau-ddyddiad-16

gyda Mewnosod Data ar Hap cyfleustodau, gallwch hefyd fewnosod cyfanrif ar hap, llinyn ar hap, ac amser ar hap yn y blaen. Cliciwch yma i wybod mwy am Mewnosod Data ar Hap.


Erthyglau Perthynas:



Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (9)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A allwn ddefnyddio blwch testun yn lle blwch mewn macro
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Diolch am rannu cod gwych. Fodd bynnag, hoffwn ofyn un cwestiwn. Rwy'n defnyddio'r cod VBA hwn a rannwyd gennych. 1) A allaf restru'r holl gelloedd eraill yn yr un rhes gyda'r dyddiadau? 2) A allwn ddiffinio'r gell dyddiad cychwyn a'r gell dyddiad gorffen a'r gell y bydd y wybodaeth newydd yn cael ei hysgrifennu? Rwy'n gofyn y cwestiynau hyn oherwydd mae gennyf 30 rhes. Mae gan bob rhes ddata ar gyfer gwahanol bobl. Mae Cell G yn ddyddiad cychwyn a Cell H yn ddyddiad gorffen. Mae celloedd eraill yn cynnwys rhywfaint o wybodaeth. Hoffwn i hwn gael ei restru mewn cell newydd fel yr holl ddyddiadau rhwng y celloedd hyn. Er enghraifft (dim ond yn dangos arddangosiad, felly dim ond celloedd G a H sydd wedi'u hysgrifennu isod-I yw lle mae'r rhestr yn ymddangos): Rhes 2 Person A 28/05/2017 05/06/2017 28/05/2017 Rhes 3 Person A 28/05 /2017 05/06/2017 29/05/2017 Rhes 4 Person A 28/05/2017 05/06/2017 30/05/2017 Rhes 5 Person A 28/05/2017 05/06/2017 31/05 Rhes 2017 Person A 6/28/05 2017/05/06 2017/01/06 Rhes 2017 Person A 7/28/05 2017/05/06 2017/02/06 Rhes 2017 Person A 8/28/05 2017/05 /06 2017/03/06 Rhes 2017 Person A 9/28/05 2017/05/06 2017/04/06 Rhes 2017 Person A 10/28/05 2017/05/06 2017/05/06 Rhes B2017 11 /23/05 2017/31/05 2017/23/05 Rhes 2017 Person B 12/23/05 2017/31/05 2017/24/05 Rhes 2017 Person B 13/23/05 2017/31/05 2017/25/05 /2017 Rhes 14 Person B 23/05/2017 31/05/2017 26/05/2017 ac ati...
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Ceisiais y cod VBA roedd yn gweithio... Diolch am rannu. Yn yr un modd a yw'n bosibl ei phasio ar hyd colofnau / yn llorweddol?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, os ydych chi eisiau rhestru dyddiadau mewn rhes yn llorweddol, does ond angen i chi ddefnyddio'r cod vba i restru'r dyddiadau, a chopïo'r canlyniadau a gludo trawsosod.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Firat - wnaethoch chi ddatrys eich mater? Mae gennyf yr un mater yn union ac ni allaf gael y canlyniad yn y rhes yn lle'r golofn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Beth am geisio trawsosod canlyniad y golofn yn rhes?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Os byddwch yn gwrthdroi'r llinell hon gallwch wneud iddi weithio :


OutRng.Offset(ColIndex, 0) = i i OutRng.Offset(0, ColIndex) = i
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Sut i ddolennu'r cod vba hwn (1000 o resi er enghraifft) ?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'n ddrwg gennyf am ateb mor hwyr, ond nid wyf yn deall eich cwestiwn, y VBA dim ond ar gyfer rhestru dyddiadau rhwng ystod dyddiad, pam mae angen dolen y cod?
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir