Kā ievietot tabulas nākamajām x dienām
Vai jums ir nepieciešamas izklājlapas ar nosaukumiem ar datumu? Tas ir noderīgi, piemēram, ja ierakstāt dienas datus un katram ierakstam izmantojat atsevišķu darblapu.
Ja vēlaties ietaupīt sevi, veidojot darblapas un pievienojot vēlamās datuma vērtības, jums var palīdzēt makro. Šis makro definē vairākas darblapas, kas seko pašreizējam datumam, pamatojoties uz pašreizējo datumu:
Sub FuegeTabellenEin ()
Dim numurs kā vesels skaitlis
Dim i As Integer
Skaitlis = ievades lodziņš ("Cik lapas ievietot?")
Attiecībā uz i = 1 Uz numuru
Darblapas. Pievienot pēc: = Darblapas (Worksheets.Count)
Darblapas (Worksheets.Count). Nosaukums = Datums + i
Tālāk i
Beigt apakš
Pēc makro palaišanas programma Excel parāda ievades logu. Šajā logā varat ievadīt izveidojamo darblapu skaitu. Šajā attēlā parādīts, kā izskatās šis logs:
Šeit ievadiet vēlamo darblapu skaitu. Sākot ar pašreizējo datumu, programma Excel izveido vajadzīgo izklājlapu skaitu un nodrošina tām pašreizējo datumu, nākamās dienas datumu un tā tālāk. Sekojošais attēls parāda, kā var izskatīties rezultāts:
Padoms. Ja vēlaties uzzināt, kā programmā Excel ievadīt un sākt makro, īsu aprakstu atradīsit šeit: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
