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

Hvordan indsætter man specifikt antal kolonner med faste intervaller i Excel?

I din daglige brug af Excel kan du løbe ind i en situation, som du har brug for tilføje flere kolonner mellem de eksisterende kolonner. Du kan selvfølgelig indsætte kolonnerne én efter én ved hjælp af Indsæt-funktionen. Men når du står over for store data og skal indsætte tre kolonner efter hver anden eller n. kolonne, er funktionen Indsæt tilsyneladende ikke effektiv. Så hvordan kan du hurtigt afslutte opgaven? I denne tutorial vil vi tale om to nemme metoder til at løse problemet.

Indsæt specifikt antal tomme kolonner i dataområdet med faste intervaller med VBA-kode

Indsæt et specifikt antal tomme kolonner i dataområdet med faste intervaller med en fantastisk funktion


Indsæt specifikt antal tomme kolonner i dataområdet med faste intervaller med VBA-kode

Vi kan bruge nedenstående VBA-kode at indsætte et bestemt antal tomme kolonner efter hver n'te kolonne. Gør venligst som følger.

1. Tryk på Alt + F11 nøgler i Excel, og det åbner Microsoft Visual Basic til applikationer vindue.

2. klik indsatte > Moduler og indsæt følgende makro i Moduler Vindue.

VBA-kode: Indsæt specifikt antal kolonner i data med faste intervaller

Sub InsertColumnsAtIntervals()
'Updateby Extendoffice
Dim Rng As Range
Dim xInterval As Integer
Dim xColumns As Integer
Dim xColumnsCount As Integer
Dim xNum1 As Integer
Dim xNum2 As Integer
Dim WorkRng As Range
Dim xWs As Worksheet
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xColumnsCount = WorkRng.Columns.Count
xInterval = Application.InputBox("Enter column interval. ", xTitleId, 1, Type:=1)
xColumns = Application.InputBox("How many columns to insert at each interval? ", xTitleId, 1, Type:=1)
xNum1 = WorkRng.Column + xInterval
xNum2 = xColumns + xInterval
Set xWs = WorkRng.Parent
For i = 1 To Int(xColumnsCount / xInterval)
    xWs.Range(xWs.Cells(WorkRng.Row, xNum1), xWs.Cells(WorkRng.Row, xNum1 + xColumns - 1)).Select
   Application.Selection.EntireColumn.Insert
    xNum1 = xNum1 + xNum2
Next
End Sub

3. Tryk på F5 nøglen til at køre denne kode. En promptboks kommer frem for at minde dig om at vælge dataområde hvor du vil indsætte tomme kolonner.
doc indsæt-kolonner-med-intervaller 1

4. Klik på OK knap. Endnu en promptboks dukker op, indtast venligst antallet af kolonneintervaller i Indtast kolonneinterval boks.
doc indsæt-kolonner-med-intervaller 2

5. Fortsæt med at klikke på OK knap. Den tredje promptboks springer ud, angiv venligst antallet af kolonner, du vil indsætte ved hvert interval i kassen.
doc indsæt-kolonner-med-intervaller 3

6. Klik på OK knappen for at få resultatet.
doc indsæt-kolonner-med-intervaller 4


Indsæt et specifikt antal tomme kolonner i dataområdet med faste intervaller med en fantastisk funktion

Hvis du ikke ønsker at bruge VBA-kodemetoden, Indsæt tomme rækker og kolonner træk ved Kutools til Excel er den perfekte løsning for dig. Med denne funktion kan du indsætte det specifikke antal kolonner i dataområdet med faste intervaller med blot et par klik.

Før påføring Kutools til Excel, download og installer det først.

1. Vælg først det eksisterende dataområde. Klik derefter Kutools > indsatte > Indsæt tomme rækker og kolonner.
doc indsæt-kolonner-med-intervaller 5

2. Det Indsæt tomme rækker og kolonner dialogboksen dukker op. Du kan se det dataområde, du valgte i trin 1, vist i feltet Område. Vælg Tomme søjler valgmulighed i Indsæt type afsnit. Og specificer antallet af kolonneintervaller og kolonner, du vil indsætte ved hvert interval. Her indtaster jeg 1 og 3 hver for sig.
doc indsæt-kolonner-med-intervaller 6

3. Klik på OK knappen for at afslutte indstillingen og få resultatet.
doc indsæt-kolonner-med-intervaller 7

Bemærk: Hvis du vil have en gratis prøveperiode (30 dage) af dette værktøj, skal du klikke for at downloade det, og derefter gå til at anvende handlingen i henhold til ovenstående trin.


Andre operationer (artikler)

Hvordan man hurtigt indsætter en linje baseret på den aktuelle dato i Excel?
Antag, at der er et ark, der indeholder en række med datoer, og nu vil jeg indsætte en linje lige til den aktuelle dato, som automatisk ændres, mens du åbner projektmappen hver dag. Er der et trick, der kan løse det i Excel?

Hvordan indsætter man altid en tom række nedenfor i stedet for ovenfor i Excel?
Som vi alle vidste, når den tomme række indsættes i et regneark, indsættes den tomme række altid over den valgte række eller celle. Men nogle gange skal du muligvis indsætte rækken under den valgte celle eller række. Hvordan kunne du løse dette job i Excel?

Sådan indsætter du en tom ny række automatisk med kommandoknap i Excel?
I mange tilfælde skal du muligvis indsætte en tom ny række i en bestemt position på dit regneark. I denne artikel viser vi dig, hvordan du automatisk indsætter en tom ny række ved at klikke på en kommandoknap i Excel.

Hvordan indsætter man en tom række efter specifik tekst i Excel?
Hvis du vil indsætte tomme rækker efter en bestemt tekst som vist nedenstående skærmbillede, hvordan håndteres det hurtigt og nemt uden at indsætte dem manuelt en efter en?


  • Super formel bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
  • Flet celler / rækker / kolonner og opbevaring af data; Split celler indhold; Kombiner duplikatrækker og sum / gennemsnit... Forhindre duplikerede celler; Sammenlign områder...
  • Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
  • Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
  • Foretrukne og hurtigt indsætte formler, Områder, diagrammer og billeder; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
  • Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
  • Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Pivottabelgruppering efter ugenummer, ugedag og mere ... Vis ulåste, låste celler ved forskellige farver; Fremhæv celler, der har formel / navn...
kte-fane 201905
  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
officetab bund
Sorter kommentarer efter
Kommentarer (0)
Ingen vurderinger endnu. Vær den første til at bedømme!
Der er endnu ingen kommentarer her
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder

Følg os

Copyright © 2009 - www.extendoffice.com. | Alle rettigheder forbeholdes. Drevet af ExtendOffice. | | Sitemap
Microsoft og Office-logoet er varemærker eller registrerede varemærker tilhørende Microsoft Corporation i USA og / eller andre lande.
Beskyttet af Sectigo SSL