¡Á¥¹¥Æ¥­¤Ë´¶¤¸¤ë¥Þ¥¤¥é¥¤¥Õ¡Á

¤´Ë¬Ì䤢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£º£Æü¤â¥¹¥Æ¥­¤Ê£±Æü¤Ç¤¢¤ê¤Þ¤¹¤è¤¦¤Ë¢ö

²áµî¤ÎÅê¹ÆÆüÊÌɽ¼¨

[ ¥ê¥¹¥È | ¾ÜºÙ ]

Á´1¥Ú¡¼¥¸

[1]

¡ù±§Ãè¿©¤½¤Î­¢¡ù

£±£²·î£±£¶Æü¤Î±§Ãè¿©¤Î³¤­¤Ç¤¹
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡Ú±§Ãè¿©¤Î¤ªÌߡۡ¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡Ú¿å¤Ë¿»¤·¤Æ¿ôÉÃÂÔ¤Á¤Þ¤¹¡Û
¥¤¥á¡¼¥¸ 1¥¤¥á¡¼¥¸ 2

















¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¥¹¥Ú¡¼¥¹¥·¥ã¥È¥ë¤Ç¤â»ÈÍѤµ¤ì¤¿¥Õ¥ê¡¼¥º¥É¥é¥¤¤Î¤ªÌߤǤ¹¡£

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡ÉÕ°¤ÎÍÆ´ï¤Ë¿å¤ò¤¤¤ì¤Æ¥É¥é¥¤¤Î¤ªÌߤò¿»¤·

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¤ªÌߤ¬½À¤é¤«¤¯¤Ê¤ë¤Þ¤Ç¿ôÉÃÂÔ¤Á¤Þ¤¹¡£

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡´ÅÌ£¤¬ÉÕ¤¤¤Æ¤¤¤ë¤­¤ÊÊ´¤Ë¤Þ¤Ö¤»¤Ð½ÐÍè¾å¤¬¤ê¤Ç¤¹¡£

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¤ªÌߤȤ¤¤¦¤è¤ê¤ª²Û»Ò¤Ë¶á¤¤¿©´¶¤Ç¤¹¡£

³«¤¯ ¥È¥é¥Ã¥¯¥Ð¥Ã¥¯¡Ê1¡Ë

£±£²·î£±£´Æü¤ËÊݸ¤·¤¿¥Ö¥Ã¥¯¤ò³«¤­¤Þ¤¹¡£
¡Úưºî¤Îµ­½Ò¤ò¤¹¤ë¡Û
¥¤¥á¡¼¥¸ 1
Visual Basic Editor¤ò³«¤¤¤Æ¡Ìsheet1¡Í¤ò¥À¥Ö¥ë¥¯¥ê¥Ã¥¯¤·
¥ª¥Ö¥¸¥§¥¯¥È¤Îɽ¼¨ÏȤè¤ê¡ÌGeneral¡Í¤ò¡ÌWorksheet¡Í¤ËÊѹ¹¤·¤Þ¤¹
¥×¥í¥·¥¸¥ã¡¼¤Î¡ÌBeforedoubleclick¡Í¤òÁªÂò¤·¤Þ¤¹
¤³¤³¤Ë
Const r1 As Integer = 3
Const c1 As Integer = 3
Const r2 As Integer = 12
Const c2 As Integer = 12
Dim flg As String
flg = "ok"
If Target.Row < r1 Or Target.Row > r2 Or Target.Column < c1 Or Target.Column > c2 Then
flg = "no"
ElseIf Target.Row = Target.Colmn Then
flg = "no"
Else
flg = "ok"
End If
If flg = "ok" Then
Sheet1.Unprotect
Target.Locked = False
Sheet1 Cells(Target.Column, Target.Row).Locked = False
If Target.Value = "" Then
Target.Value = "¡û"
Sheet1.Cells(Target.Column, Target.Row).Value = "¡ß"
ElseIf Target.Value = "¡û" Then
Target.Value = "¡ß"
Sheet1.Cells(Target.Column, Target.Row).Value = "¡û"
ElseIf Target.Value = "¡ß" Then
Target.Value = ""
Sheet1.Cells(Target.Column.Target.Row).Value = ""
End If
Cancel = True
Target.Locked = True
Sheet1.Cells(Target.Column, Target.Row).Locked = True
Sheet1.Protect
End If
¤ÈÆþÎϤ·¤Þ¤¹
Êݸ¤·¤Þ¤¹

¡Ú̾Á°¤òÆþÎϤ·¤Æµ­½Ò¤¹¤ë¡Û
¥¤¥á¡¼¥¸ 2
¥»¥ë¤ËÌá¤Ã¤Æ¡ÌR3C2¡Í¤«¤é¡ÌR12c2¡Í¤Þ¤Ç̾Á°¤òÆþÎϤ·¤Þ¤¹
¡ÌR2C3¡Í¤Ë=¡ÌR[1]C[-1]¡Í¤ÈÆþÎϤ·Æ±¤¸¤è¤¦¤Ë¡ÌR2C12¡Í¤Þ¤ÇÆþÎϤ·¤Þ¤¹
¥Ä¡¼¥ë¥Ð¡¼¤Î¡Ì¥Ä¡¼¥ë¡Í¢ª¡ÌÊݸî¡Í¢ª¡Ì¥·¡¼¥È¤ÎÊݸî¡Í¤òÁªÂò¤·¤Þ¤¹
ÁªÂò²èÌ̤¬É½¼¨¤µ¤ì¤¿¤é¡Ì£Ï£Ë¡Í¥Ü¥¿¥ó¤ò²¡¤·¤Þ¤¹
¡ÌR4C3¡Í¤ò¥À¥Ö¥ë¥¯¥ê¥Ã¥¯¤¹¤ë¤Èɽ¼¨¤µ¤ì¤Þ¤·¤¿
¤µ¤é¤Ë¥À¥Ö¥ë¥¯¥ê¥Ã¥¯¤¹¤ë¤Èɽ¼¨¤¬¾Ã¤¨¤Þ¤·¤¿
¥»¥ë¤ò¥À¥Ö¥ë¥¯¥ê¥Ã¥¯¤¹¤ë¤¿¤Ó¤Ëɽ¼¨¾õÂÖ¤¬ÊѤï¤ê¤Þ¤¹
¤Ê¤ª¤Î£Å£ø£ã£å£ì¶µ¼¼¤è¤ê

Á´1¥Ú¡¼¥¸

[1]


.
sarimama
sarimama
Èó¸ø³« / Èó¸ø³«
¿Íµ¤ÅÙ
Yahoo!¥Ö¥í¥°¥Ø¥ë¥× - ¥Ö¥í¥°¿Íµ¤Å٤ˤĤ¤¤Æ

¥Ö¥í¥°¥Ð¥Ê¡¼

Æü ·î ²Ð ¿å ÌÚ ¶â ÅÚ
1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30 31

¡ùÆüµ­¡ù

¡ù¥¹¥Æ¥­¤Êphoto¡ù

¡ù¥Ú¥Ã¥È¤Á¤ã¤ó¡ù

¡ù³Ú¤·¤¤¡ù

¡ù¾® Àâ¡ù

ɸ½à¥°¥ë¡¼¥×

ÅÐÏ¿¤µ¤ì¤Æ¤¤¤Þ¤»¤ó

²áµî¤Îµ­»ö°ìÍ÷

Yahoo!¤«¤é¤Î¤ªÃΤ餻

¸¡º÷ ¸¡º÷
ͧ¤À¤Á(8)
  • ¤Á¤§¤ë¤·¡¼
  • anmama
  • ¥é¥º¥Ù¥ê¡¼
  • ¤ß¤«¤ê¤ó¢ö
  • ¤À¤¤¤À¤¤
  • ¥¤¥Ê
ͧ¤À¤Á°ìÍ÷

¤è¤·¤â¤È¥Ö¥í¥°¥é¥ó¥­¥ó¥°

¤â¤Ã¤È¸«¤ë

[PR]¤ªÆÀ¾ðÊó

CM¤ÇÏÃÂê¤Î¤Õ¤ë¤µ¤ÈǼÀÇ¥µ¥¤¥È¤µ¤È¤Õ¤ë
ËèÆü¤ªÎéÉÊ¥é¥ó¥­¥ó¥°¹¹¿·Ã桪
2019ǯ¤Î¤Õ¤ë¤µ¤ÈǼÀǤϢã12¡¿31¤Þ¤Ç¢ä

¤½¤Î¾¤Î¥­¥ã¥ó¥Ú¡¼¥ó


¤ß¤ó¤Ê¤Î¹¹¿·µ­»ö