����ނ̃y�[�X�g�𖡂키
����̂���́u�R�s�[���y�[�X�g�v�ł��B�L�z���I�Ȃ��Ƃ����ɁA
���������o���Ă����������ǂ��̂ł͂Ǝv���A���グ�Ă݂�
�����B
"�Z���̏����ݒ�"����������������ƕ�����Ǝv���܂����A
Excel�ł͂P�̃Z���̒��Ɏ��ɂ�������̏����l�ߍ����
���܂��B�r�����t�H���g�̎w����A�������[���l���ɓ�
�ꂽ��ŃR�s�[���y�[�X�g���Ȃ��Ǝv�����悤�Ȍ��ʂ��o�܂���B
�����Łu�Z��A1���R�s�[���A�Z��B2�ɓ\��t�����ꍇ�v�̃R�[�h
�����Ă݂܂��傤�B
| Sub test() | |
| Range("A1").select Selection.Copy Range("B2").select ActiveSheet.Paste |
|
| End Sub | |
���ƂȂ��������肢�������܂��ˁB
Selection.Copy�́u�I�����ꂽ�Ƃ�����R�s�[����v�B
ActiveSheet.Paste�́u�A�N�e�B�u�ɂȂ��Ă���V�[�g�ɓ\��t��
��v�Ƃ����Ӗ��ł��B
�Ƃ��낪�A���ꂪ�u�`����I�����ē\��t���v�̏ꍇ�ǂ��Ȃ�ł��傤�B
���̃R�[�h�����Ă��������B
Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
_ SkipBlanks:=False, Transpose:=False
Range("A1").Select
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
�ǂ��ł��傤�B�p�b�ƌ��ł͕�����ɂ����Ǝv���܂����A�������@��
�w�肪�قȂ��Ă���̂́A�������肢��������ł��傤���B ���
�R�[�h�́u�l��\��t����v�w��B���́u������\��t����v�w���
�Ȃ��Ă��܂��B
�u�ҏW�v���u�`����I�����ē\��t���v��I������ƁA�e��ݒ��
�_�C�A���O�{�b�N�X���o�Ă��܂����ǁA�e���ڂ͂��̂悤�ɑΉ�����
���܂��B
Paste:= �u�\��t���v
Operation:= �u���Z�v
SkipBlanks:= �u�Z��������v
Transpose:= �u�s������ւ���v
�C�R�[���̌�ɐݒ肷��l�ɂ���āA�������e�����܂�܂��B������
�����ł͒l�̈ꗗ�Ȃǂ͏o���܂���B�g���Ƃ��Ƀ}�N���̎����L�^��
�g���āA�ǂ̂悤�ɒl���ω����邩�m�F���Ă݂ĉ������B���܂肱�̕�
�̒l�̃o���G�[�V�������ËL���Ă����ɂ͗����Ȃ����̂ł�����B
�i�����o���Ă܂���j
�����܂ł̐����Łu����H�����k�P�ĂȂ����v�Ǝv�������̓G���C�I
�����ł��A�u�����N�\��t���v�̑��݂�Y��Ă͂����܂���B
�u�����N�\��t���v�͓��ɒlj��Ŏw�肷�鍀�ڂ��Ȃ��̂�
ActiveSheet.Paste Link:=True
�����ł����悤�ł��B
�F�X�ƃ}�N���������Ă���ƁA���������œ����悤�ȃR�[�h���g�p����
�̂ŁA��Ԃ��Ȃ����߂ɃR�[�h���R�s�[���Ă����������悤�ɂȂ��Ă���
�Ǝv���܂��B���������Ƃ��ɁA�u�����悤�ȃR�[�h���R�s�[���Ă�������
�S�R�Ⴄ�����������v�Ƃ����悤�Ȃ��Ƃ��Ȃ��悤�ɁA"�Ⴂ�̕�����
�j"�i�ӂ邢��` ^^;�j�ɂȂ�܂��傤�B
 |
 |
TOP �� �u�a�`���N������ �`Part 1�`