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

Hogyan lehet összekapcsolni a jelölőnégyzeteket az Excel több cellájával?

A jelölőnégyzetek összekapcsolása több relatív cellával segíthet abban, hogy gyorsan és egyszerűen elvégezzen néhány számítást, amikor csak a bejelölt vagy be nem jelölt cellák összegzésére, számolására vagy átlagolására van szükség. De, megpróbálta már összekapcsolni a jelölőnégyzeteket több cellával egyszerre egy munkalapon?

Kapcsolja be a jelölőnégyzeteket több cellába, amelyek képlete egyenként

Kapcsolja be a jelölőnégyzeteket több cellába egyszerre VBA kóddal


nyíl kék jobb buborék Kapcsolja be a jelölőnégyzeteket több cellába, amelyek képlete egyenként

Ha a jelölőnégyzetet egy adott cellához kívánja kapcsolni, valójában egyszerű képletet alkalmazhat a manuális összekapcsoláshoz.

1. Miután beillesztette a jelölőnégyzeteket a munkalapba, a jelölőnégyzet kiválasztásához nyomja meg a gombot Ctrl gombot, majd kattintson az első jelölőnégyzetre, amelyet más cellához kíván kapcsolni.

2. Ezután írja be a képletsávba az egyenlőségjelet =, majd kattintson egy cellára, amelyhez össze szeretné kapcsolni a jelölőnégyzetet, például B2, lásd a képernyőképet:

doc-link-multiple-checkboxes-1

3. Ezután nyomja meg a gombot belép billentyű a billentyűzeten, most, amikor bejelöli ezt a jelölőnégyzetet, megjelenik a csatolt cella TRUE, ha törli a jelölést, akkor megjelenik HAMIS, lásd a képernyőképet:

doc-link-multiple-checkboxes-2

4. Ismételje meg a fenti lépéseket más jelölőnégyzetek egyesítéséhez.


nyíl kék jobb buborék Kapcsolja be a jelölőnégyzeteket több cellába egyszerre VBA kóddal

Ha több száz és ezer jelölőnégyzetet kell összekapcsolni más cellákkal, akkor az első módszer nem fog hatékonyan működni. Ha egyszerre több cellához kapcsolja őket, alkalmazhatja a következő VBA kódot. Kérjük, tegye a következőket:

1. Lépjen a munkalapra a jelölőnégyzetek listájával.

2. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

3. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.

VBA-kód: a jelölőnégyzeteket egyszerre több cellához kapcsolja

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. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, az aktív munkalap összes jelölőnégyzetét összekapcsolják a cellákkal, amikor bejelöli a jelölőnégyzetet, a relatív cellája megjelenik TRUE, ha töröl egy jelölőnégyzetet, akkor a csatolt cellának meg kell jelennie HAMIS, lásd a képernyőképet:

doc-link-multiple-checkboxes-3

Megjegyzések: A fenti kódban i = 2, a szám 2 a jelölőnégyzet kezdő sora és a betű B az oszlop helye, ahová össze kell kapcsolni a jelölőnégyzeteket. Igény szerint megváltoztathatja őket.


Kapcsolódó cikkek:

Hogyan jelölje ki az összes jelölőnégyzetet egyetlen jelölőnégyzet használatával az Excel programban?

Hogyan lehet gyorsan beilleszteni több jelölőnégyzetet az Excelbe?

Hogyan lehet gyorsan törölni több jelölőnégyzetet az Excelben?


A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

  • újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
  • Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
  • Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
  • Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
  • Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
  • Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
  • Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
  • Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
  • Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.
kte lap 201905

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
officetab alja
A megjegyzések rendezése szerint
Hozzászólások (16)
Még nincs értékelés. Legyen Ön az első, aki értékel!
A weboldal moderátora ezt a megjegyzést minimalizálta
Több mint 40000 5 cellám van, amelyekben van jelölőnégyzet. Amikor ezt a kódot használom, több mint XNUMX másodpercig tart a feldolgozás, különböző makrókat definiálok a különböző cellákhoz, de továbbra is fennáll a probléma, mit tehetek?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia! A VBA-kódban: link jelölőnégyzetek több cellához egyszerre, a kód úgy van beállítva, hogy az alatta lévő cellát összekapcsolja. Milyen a kód, ha az elsőtől balra lévő cellát szeretném összekapcsolni? Kösz!
A weboldal moderátora ezt a megjegyzést minimalizálta
Megtehetem ezt, és programozhatom a dobozokat úgy, hogy az igaz és hamis helyett mást mondjanak?
A weboldal moderátora ezt a megjegyzést minimalizálta
Helló! Jó poszt a VBA-ról... de mi van akkor, ha van 3 olyan oszlop, amiben van jelölőnégyzet, amit három másik oszlopban is össze kell kapcsolni? Tegyük fel, hogy a B, C és D oszlopban jelölőnégyzetek találhatók, és ezeket a H, I és J oszlopokhoz kell kapcsolni.
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia! Ugyanez a probléma – rájöttél, hogyan lehet ezt megkerülni? Köszönöm, Paul
A weboldal moderátora ezt a megjegyzést minimalizálta
Hé,

Próbáld ezt:

Sub LinkCheckBoxes()
Dim chk As CheckBox
Dim lCol As Long
lCol = 2 'oszlopok száma jobbra a hivatkozáshoz

Minden egyes chk In ActiveSheet.CheckBoxes
chk-val
.LinkedCell = _
.TopLeftCell.Offset(0, lCol).Cím
Vége
Következő chk

End Sub



Ha például a D,E,F jelölőnégyzetei az "Icol"-t 1-re változtatják, így a G,H és I-re hivatkozik.
A weboldal moderátora ezt a megjegyzést minimalizálta
köszönöm szépen
A weboldal moderátora ezt a megjegyzést minimalizálta
Tudnátok nekem segíteni ebben a problémában?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia, nekem is ugyanez a problémám, de nekem nem jött be, tudna segíteni. Köszönöm
A weboldal moderátora ezt a megjegyzést minimalizálta
Sub LinkCheckBoxes()

Dim chk As CheckBox

Dim lCol As Long

lCol = 1 'oszlopok száma jobbra a hivatkozáshoz



Minden egyes chk In ActiveSheet.CheckBoxes

chk-val

.LinkedCell = _

.TopLeftCell.Offset(0, lCol).Cím

Vége

Következő chk



End Sub
A weboldal moderátora ezt a megjegyzést minimalizálta
Mit szólnál, ha van néhány üres sor az A oszlopban (a példád szerint) a jelölőnégyzetek között? A fenti kód használatával a csatolt cellákat hibásan kezeli, ha üres sorok vannak, mert nem hagyja ki őket. Érdekelne a megoldás
A weboldal moderátora ezt a megjegyzést minimalizálta
Találtál erre valami megoldást? Ugyanaz a probléma
A weboldal moderátora ezt a megjegyzést minimalizálta
remek téma és nekem bevált.
DE az IGAZ/HAMIS adatokat egy másik lapra kell mentenem. Mi az a VBA, hogy az aktívtól eltérő másik lapra mentse?
A weboldal moderátora ezt a megjegyzést minimalizálta
Helló
Подскажите. Возможно ли суммирование чисел в ячейках по установке флажка?

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

В ячейке F3 скрыто число 2 а в ячейке G3 скрыто число 0,3, можно ли сделать так чмлито число 3.
Сумма вычислений только на строку в диапазоне F3-P3
A weboldal moderátora ezt a megjegyzést minimalizálta
A problémám a következő: készítek egy teendőlistát a napi szokásokkal. Szeretnék statisztikát készíteni belőle a cellához kapcsolt négyzet bejelöléséből az igaz és hamis értékekkel, de nem szeretném külön megtenni, de a kód használatakor nem történik semmi?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia Gregor!
A VBA kód jól működik a munkafüzetemben.
Ide töltheti fel a fájlt, hogy ellenőrizhessük, hol a probléma.
Köszönöm!
Még senki sem írt megjegyzést
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi