�Z���̃}�N�������₷���Ȃ�Excel�́uR1C1�Q�ƌ`���v�FVBA�^�}�N���֗�Tips

�Ɩ��������ɖ𗧂�VBA�^�}�N���̂��܂��܂�Tips���R�[�h��������ďЉ�Ă����܂��B����́A�Z���̔Ԓn���w�肷��ۂ̒ʏ�́uA1�`���v�Ƃ͈قȂ�uR1C1�Q�ƌ`���v�ɂ‚��āA���̊T�v�Ɛݒ�̎d���A���_�E���_�A����𗘗p�����}�N������Љ�B

» 2014�N06��06�� 18��00�� ���J
[��t�������CPROJECT KySS]
uVBA^}N֗TipsṽCfbNX

�A�ږڎ�

���{Tips�̊‹��FWindows 8.1 Enterprise�i64�r�b�g�j�{Excel 2013


�@�Z���̔Ԓn���w�肷��ꍇ�́A�ʏ�́uA1�`���v���f�t�H���g�l�ƂȂ��Ă���B�Ⴆ�΁AA1�AA2�c�c�AB1�AB2�c�c�Ǝw�肷��̂��uA1�`���v���B���́A���̃Z���Ԓn�̎w������ɂ͂���1�A�uR1C1�Q�ƌ`���v�Ƃ������̂����݂���̂����A���������낤���B

�@����́A���́uR1C1�Q�ƌ`���v�̗��_�ɂ‚��čl���Ă݂悤�B

�uR1C1�Q�ƌ`���v���g�p����ɂ�

�@���̌`�����g�p����ꍇ��Excel���j���[�́m�t�@�C���n���m�I�v�V�����n�ƑI�����m�����n��I�����āA�mR1C1�Q�ƌ`�����g�p����n�Ƀ`�F�b�N��t����i�}1�j�B

�}1�@�uR1C1�Q�ƌ`�����g�p����v�Ƀ`�F�b�N��t����

�@A1�`�����g�p���Ă���ꍇ�́A�Ⴆ��A1��I�����Ă���ꍇ�A�u��v���}2�̂悤�ɁuA�v�ƕ\�������B

�}2�@�uA1�`���v�ŁuA��1�s�ځv��I������

�@�uR1C1�Q�ƌ`���v�ł́A�u��v�́uC1�v�̂悤�ɕ\�������i�}3�j�B

�}3�@�uR1C1�Q�ƌ`���v�Łu1�s1��ځv��I������

�@�uR1C1�Q�ƌ`���v�ł́A�����������肾�Ǝv�����AR��Row�́u�s�v��\���AC��Column�́u��v��\���Ă���B����Đ}3�ł�1�s�ڂ̗�1��ڂ�I�����Ă���Ӗ��ɂȂ�B����ɁA�}2�Ɛ}3������ׂ�Ɛ}2�̗�̓A���t�@�x�b�g�\�L�����A�}3�͐��l�ŕ\������Ă���B

�uR1C1�Q�ƌ`���v�̗��_

�@�Ⴆ�ΐ}4�̂悤�ȃf�[�^������Ƃ��悤�B

�}4�@A1����AA�܂ŁuExcel VBA�v�Ƃ������������͂���Ă���

�@�uA1�`���v�őS�ẮuExcel VBA�v�̕����F���u�ԁv�ɕω�������ɂ̓��X�g1�̂悤�Ƀ}�N�����L�q����BVBE���N�����ām�}���n���m�W�����W���[���n�ƑI�����āAModule���ɋL�q����B

Option Explicit
Sub �S�Ă̕����F��Ԃɕς���()
  Dim i As Long
  Dim j As Long
  For i = 1 To 26
    For j = 1 To 27
      Cells(i, j).Font.ColorIndex = 3
    Next
  Next
End Sub
���X�g1�@�S�ẮuExcel VBA�v�̕����F��Ԃɕς���}�N��

�@Long�^�̕ϐ��ui�v�Ɓuj�v��錾���A�ϐ��ui�v�Łu�s�ԍ��v�A�ϐ��uj�v�Łu��ԍ��v���w�肵�Ĕ����������s���A�uCells(�s�ԍ�,��ԍ�)�v�̏������g���ĕ����̐F���u3�v�i�ԁj�ɕύX���Ă���B

�@ColorIndex�̐F�ԍ��ɂ‚��ẮA�L���u�Z���̐��l�A�t�H���g�A�����ʒu�A�w�i�F�A�������ȂǕ\���`���^�����ݒ�̎g�����v���Q�Ƃ��Ăق����B

�@�����VBE�̃��j���[����m���s�n���mSub/���[�U�[�t�H�[���̎��s�n�Ƃ���ƁA�S�Ă̕����F���Ԃɕω�����B

�@���Ƀv���O������͉��̖����Ȃ��̂����A�uA1�`���v�ŃR�[�h�������ƁA�u�s�ԍ��v�͐��l�ŕ\������Ă���̂Ō���Ε����邪�A�u��ԍ��v��A�`DAR�Ƃ������悤�ȃA���t�@�x�b�g�ŕ\������邽�߁A���X�g1�́u��ԍ��v���w�肷��ۂɁA�����A�`AA�܂ł͈̔͂Ƃ��Ă���̂ŁA�A���t�@�x�b�g26������1�𑫂��āu27�v�ƌv�Z���Ďw�肵�Ă���B�uA1�`���v�ł́u��ԍ��v���w�Ő����˂΂Ȃ�Ȃ��̂��B

�@�Ƃ��낪�A���ꂪA�`DAR�Ƃ������悤�ȏꍇ�ɂ́A��̔ԍ��𐔂���̂͂��͂�s�”\�ɋ߂��B�����ŕ֗��Ȃ̂��uR1C1�Q�ƌ`���v�ɂȂ��Ă���̂��B

�@�}4���uR1C1�Q�ƌ`���v�ŕ\��������ƁA�}5�̂悤�ɕ\�������B

�}5�@�uA1�`���v�ł́AA1����AA�܂ł��uR1C1�Q�ƌ`���v�ŕ\���������B�}���������ƌ��Â炢�̂ňꕔ��������傫���f�ڂ���

�@�}4�Ɛ}5������ׂ�ƕ����邪�A��ɂ��������悤�ɁA��ԍ������l�ŕ\������Ă���B����Ȃ�Ⴆ�΁uAA�v�̗񂪉���ڂɓ����邩����������������K�v���Ȃ��B

�@���̂悤�ɁuR1C1�Q�ƌ`���v�ł́A�u�s�v���u��ԍ��v���S�Đ��l�ŕ\������邽�߂ɁAVBA��������ł͔��ɕ֗��ł͂��邪�A�f�t�H���g���uA1�`���v�ɂȂ��Ă��邵�A�قƂ�ǂ�Excel VBA�̉���ł́uA1�`���v���p�����Ă��邽�߁A�{Tips�A�ڂł��uA1�`���v�ʼn�����Ă���B

�@���X�g1�����s����ƁA�}6�̂悤�ɕ\�������B

�}6�@�S�Ă̕������Ԃɕς����

�@�}6�́A�uR1C1�Q�ƌ`���v�ŕ����F��ς��Ă��邪�R�[�h�̓��X�g1�̂܂܂��B

�uR1C1�Q�ƌ`���v�ɂ����ꍇ�̖��_

�@�uR1C1�Q�ƌ`���v�ɂ����ꍇ�̖��_�́ARange�v���p�e�B���g���Ȃ����Ƃ��B

�@�Ⴆ�΁uA1�`���v�ł́A

Range("A1").Value="Microsoft"

�Ǝw�肪�ł��邪�A�uR1C1�Q�ƌ`���v�ł́A

Range("R1C1").Value="Microsoft"

�Ǝw�肷��ƃG���[�ɂȂ�B���̏ꍇ��

Cells(1,1)="Microsoft"

�Ǝw�肷��K�v������̂ŁA�uR1C1�Q�ƌ`���v�ɂ����ꍇ�͒��ӂ��K�v���B

���j�I�w�i���C�ɂȂ���́A�e��������

�@����́uR1C1�Q�ƌ`���v�ɂ‚��Ă̗��_����������B�uR1C1�Q�ƌ`���v�ɂ‚��Ē��ׂĂ݂�ƁAVBA�������ꍇ�ɂ����ẮuR1C1�Q�ƌ`���v�̕����֗����Ǝv�����̂��������B�������A�uA1�`���v���ʏ��Excel�̃Z���Q�ƌ`���ł��邽�߁A�uA1�`���v�Ői�߂Ă�������͂Ȃ��B

�@VBA���g�p���Ȃ��Ȃ�uR1C1�Q�ƌ`���v�̃����b�g�͓��ɂȂ��B

�@�uA1�`���v�uR1C1�Q�ƌ`���v��2�‚����݂���ɂ́A����Ȃ�̗��j�I�w�i������悤�����A����̘A�ڂł́A����ȗ��j�I�w�i�͊֌W���Ȃ��̂ŏȂ����Ă����������B

���҃v���t�B�[��

��t�� �����i�₭���� ���ɂ₷�j�@�^�@��t������������

��t��������������\�BVisual Basic�v���O���~���O�ƁA�}�C�N���\�t�g�n�̋Z�p���e�[�}�Ƃ����A���Ђ�L���̎��M���s���B

1950�N���܂�B�����n�̃T�����[�}��������40�΂����Ńv���O���~���O���n�߁A1996�N���Ɗw��ActiveX�Ɏ��g�ށB

1997�N�ɖ�t�����ƃR���{���[�V�����E���j�b�g�uPROJECT KySS�v�������B

2003�N���t���[�ɂȂ�APROJECT KySS�̊����ɖ{�i�I�ɎQ���B.NET��RIA�Ɋւ��鏑�Ђ�L���𑽐����M����T��A����Č��̃v���O���~���O����|����B

Windows Phone�A�v���J�����o�āA���݂�Windows�X�g�A�A�v���𑽐����J���B

Microsoft MVP for Development Platforms - Client App Dev�iOct 2003-Sep 2012�j�B

Microsoft MVP for Development Platforms - Windows Phone Development�iOct 2012-Sep 2013�j�B

Microsoft MVP for Development Platforms - Client Development�iOct 2013-Sep 2014�j�B


Copyright © ITmedia, Inc. All Rights Reserved.

'; this.insertTarget = document.querySelector('#cmsBody .subscription') || document.querySelector('#cmsBody .inner'); }; BodyAdIMSWithCCE.prototype = Object.create(BodyAdContent.prototype); BodyAdIMSWithCCE.prototype.activate = function () { refreshGam('InArtSpecialLink'); } // global reference window.itm = itm; //entry point BodyAdEventBase.polyfill(); const bodyAdManager = BodyAdManager.getInstance(); bodyAdManager.addEventListener(BodyAdManager.EVENTS.READY, function (ev) { bodyAdManager.loadAdvertise(); }); bodyAdManager.init(); })();
�X�|���T�[����̂��m�点PR

���ڂ̃e�[�}

Microsoft  WindowsőO2025
AI for GWjAO
[R[h^m[R[h Zg by IT - ITGWjArWlX̒SŊ􂷂gD
Cloud Native Central by IT - XP[uȔ\͂gD
�V�X�e���J���m�E�n�E �y�����i�r�zPR
���Ȃ��ɂ������߂̋L��PR

RSS�ɂ‚���

�A�C�e�B���f�B�AID�ɂ‚���

���[���}�K�W���o�^

��IT�̃��[���}�K�W���́A �������A���ׂĖ����ł��B���Ѓ��[���}�K�W�������w�ǂ��������B