Hogyan lehet beilleszteni a dátumbélyegzőt egy cellába, ha bejelöli az Excel jelölőnégyzetét?
Normál esetben a dátumbélyegzőt az Excel gyorsbillentyűivel írja be. Mit szólna hozzá, ha a dátumbélyegzőt egy cellába helyezi be az Excel jelölőnégyzetével? A jelölőnégyzet bejelölésekor az időbélyegző automatikusan beilleszkedik egy megadott cellába. Ez a cikk segít megoldani.
Helyezze be a dátumbélyegzőt egy cellába, ha be van jelölve a VBA kóddal ellátott jelölőnégyzet
Helyezze be a dátumbélyegzőt egy cellába, ha be van jelölve a VBA kóddal ellátott jelölőnégyzet
Ez a szakasz bemutat egy VBA szkriptet, amely segít automatikusan beilleszteni egy dátumbélyegzőt egy cellába, ha bejelöli az Excel jelölőnégyzetét. Kérjük, tegye a következőket.
1. Miután bejelölt egy jelölőnégyzetet, nyomja meg a gombot más + F11 gombok egyszerre a Microsoft Visual Basic for Applications ablak.
2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok. Ezután másolja és illessze be az alábbi VBA kódot a Modul ablakba.
VBA kód: Helyezze be a dátumbélyegzőt egy cellába, ha be van jelölve egy jelölőnégyzet
Sub CheckBox_Date_Stamp()
Dim xChk As CheckBox
Set xChk = ActiveSheet.CheckBoxes(Application.Caller)
With xChk.TopLeftCell.Offset(, 1)
If xChk.Value = xlOff Then
.Value = ""
Else
.Value = Date
End If
End With
End Sub
3. nyomja meg más + Q gombok a Microsoft Visual Basic for Applications ablak.
4. Kattintson a jobb gombbal a jelölőnégyzetre, és válassza a lehetőséget Rendeljen Micro-t a jobb egérgombbal kattintva. Lásd a képernyőképet:
5. Ban,-ben Hozzárendelje a Makrót párbeszédpanelen válassza ki CheckBox_Date_Stamp a Makró neve jelölőnégyzetet, majd kattintson a gombra OK gomb. Lásd a képernyőképet:
A jelölőnégyzet bejelölésekor a dátumbélyegző automatikusan beilleszkedik a szomszédos cellába.
Kapcsolódó cikkek:
- Hogyan lehet megváltoztatni egy megadott cellaértéket vagy színt, amikor az jelölőnégyzet be van jelölve az Excelben?
- Hogyan lehet kiemelni a cellát vagy sort az Excel jelölőnégyzetével?
- Hogyan lehet a jelölőnégyzetet bejelölni az Excel cellaértéke alapján?
- Hogyan szűrhetők az adatok az Excel jelölőnégyzete alapján?
- Hogyan lehet elrejteni a jelölőnégyzetet, ha a sor el van rejtve az Excelben?
- Hogyan hozhat létre legördülő listát több jelölőnégyzettel az Excelben?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz 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!