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

Hur länkar man kryssrutor till flera celler i Excel?

Länka kryssrutorna till flera relativa celler kan hjälpa dig att snabbt och enkelt göra några beräkningar när du behöver summera, räkna eller genomsnitt bara de markerade eller omarkerade cellerna. Men har du någonsin försökt länka kryssrutorna till flera celler samtidigt i ett kalkylblad?

Länka kryssrutor till flera celler med formeln en efter en

Länka kryssrutor till flera celler samtidigt med VBA-kod


pil blå höger bubbla Länka kryssrutor till flera celler med formeln en efter en

För att länka kryssrutan till en viss cell kan du faktiskt använda en enkel formel för att länka dem manuellt.

1. När du har infogat kryssrutorna i ditt kalkylblad, tryck på för att markera kryssrutan ctrl och klicka sedan på den första kryssrutan som du vill länka till en annan cell.

2. Skriv sedan likhetstecknet i formelfältet =och klicka sedan på en cell som du vill länka kryssrutan till, B2 till exempel, se skärmdump:

doc-länk-flera-kryssrutor-1

3. Och tryck sedan på ange på tangentbordet, nu när du markerar den här kryssrutan visas den länkade cellen SANN, om du avmarkerar det kommer det att visas FALSK, se skärmdump:

doc-länk-flera-kryssrutor-2

4. Upprepade stegen ovan för att länka andra kryssrutor en efter en.


pil blå höger bubbla Länka kryssrutor till flera celler samtidigt med VBA-kod

Om det finns hundratusentals kryssrutor måste länkas till andra celler fungerar den första metoden inte effektivt, för att länka dem till flera celler samtidigt kan du tillämpa följande VBA-kod. Gör så här:

1. Gå till ditt kalkylblad med listan över kryssrutor.

2. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.

3. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.

VBA-kod: länk kryssrutor till flera celler samtidigt

Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "B"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
    Cells(i, xCChar).Value = True
Else
    Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub

4. Och tryck sedan på F5 för att köra den här koden, alla kryssrutor i det aktiva kalkylbladet har länkats till cellerna. När du markerar kryssrutan visas dess relativa cell SANN, om du avmarkerar en kryssruta ska den länkade cellen visas FALSK, se skärmdump:

doc-länk-flera-kryssrutor-3

Anmärkningar: I ovanstående kod, i = 2, numret 2 är startraden i din kryssruta och bokstaven B är kolumnplatsen där du behöver länka kryssrutorna till. Du kan ändra dem efter dina behov.


Relaterade artiklar:

Hur markerar jag alla kryssrutor med en enda kryssruta i Excel?

Hur infogar jag snabbt flera kryssrutor i Excel?

Hur tar jag snabbt bort flera kryssrutor i Excel?


De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.
kte-flik 201905

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
officetab botten
Sortera kommentarer efter
Kommentarer (16)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Jag har mer än 40000 5 celler som har kryssruta. När jag använder den här koden tar det mer än XNUMX sekunder att bearbeta, jag definierar olika makron för olika celler men jag har fortfarande problemet, vad kan jag göra?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, I din VBA-kod: länka kryssrutor till flera celler samtidigt, koden är inställd för att länka cellen under den. Hur är koden om jag vill länka cellen till vänster om den första? Tack!
Denna kommentar minimerades av moderatoren på webbplatsen
Kan jag göra detta och programmera rutorna så att de säger något annat än sant och falskt?
Denna kommentar minimerades av moderatoren på webbplatsen
Hallå! Trevligt inlägg om VBA... men tänk om det finns 3 kolumner som har kryssrutor som måste länkas i tre andra kolumner också? Låt oss säga att kolumnerna B, C och D har kryssrutor och bör länkas till kolumnerna H, I respektive J.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, Har samma problem - Har du tagit reda på hur du kan komma runt detta? Tack, Paul
Denna kommentar minimerades av moderatoren på webbplatsen
Hej,

Prova detta:

Sub LinkCheckBoxes()
Dim chk Som kryssruta
Dim lCol As Long
lCol = 2 'antal kolumner till höger för länk

För varje chk i ActiveSheet.CheckBoxes
Med chk
.LinkedCell = _
.TopLeftCell.Offset(0, lCol).Address
Sluta med
Nästa chk

End Sub



Om du till exempel har kryssrutor i D,E,F ändrar "Icol" till 1, så det länkar till G,H respektive I.
Denna kommentar minimerades av moderatoren på webbplatsen
Tack så mycket
Denna kommentar minimerades av moderatoren på webbplatsen
Kan du hjälpa mig med samma problem?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag har samma problem men det fungerade inte för mig, kan du hjälpa till. Tack
Denna kommentar minimerades av moderatoren på webbplatsen
Sub LinkCheckBoxes()

Dim chk Som kryssruta

Dim lCol As Long

lCol = 1 'antal kolumner till höger för länk



För varje chk i ActiveSheet.CheckBoxes

Med chk

.LinkedCell = _

.TopLeftCell.Offset(0, lCol).Address

Sluta med

Nästa chk



End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
Vad sägs om om du har några tomma rader i kolumn A (enligt ditt exempel) mellan kryssrutorna? Genom att använda ovanstående kod blir de länkade cellerna fel om det finns tomma rader eftersom den inte hoppar över dem. Intresserad av att se lösningen
Denna kommentar minimerades av moderatoren på webbplatsen
hittade du någon lösning på detta? Samma problem
Denna kommentar minimerades av moderatoren på webbplatsen
bra tråd och det fungerar för mig.
MEN, jag måste spara SANN/FALSK data till ett annat ark. Vad är VBA för att spara det på ett annat ark än det aktiva?
Denna kommentar minimerades av moderatoren på webbplatsen
Hallå
Подскажите. Возможно ли суммирование чисел в ячейках по установке флажка?

https://drive.google.com/file/d/1qmEnngPDdgWTISJETJ44IkxG-MABfqhh/view?usp=sharing[/img][/b][/u][/b

В ячейке F3 скрыто число 2 а в ячейке G3 скрыто число 0,3.
Сумма вычислений только на строку в диапазоне F3-P3
Denna kommentar minimerades av moderatoren på webbplatsen
Mitt problem är: Jag skapar en att göra-lista med dagliga vanor. Jag vill kunna göra statistik från det med sann och falsk från att markera rutan kopplad till en cell men vill inte göra det individuellt, men när jag använder koden händer ingenting?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Gregor,
VBA-koden fungerar bra i min arbetsbok.
Du kan ladda upp din fil här, så att vi kan kontrollera var problemet ligger.
Tack!
Det finns inga kommentarer här ännu
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL