�t�@�C���̕ۑ�
�O��͈�C�ɃG���[�����܂ł���Ă��܂��܂������ǁA���e�̕��͂�����
�����������ł��傤���B���������s���Ƃ��ŕ������g�R�Ƃ�����܂�����A
�����Ȃ����[���������܂�(^_^)
�ł́A�t�@�C�����J���g�R�܂ł����܂����̂ŁA���x�́u�ۑ��v���B�i�����Ձj
�����̂��Ƃ��}�N���̋L�^�ł���ȕ����o���オ��܂��B
| Sub File_Save() | |
| ActiveWorkbook.SaveAs Filename:= _ "C:\WINDOWS\�f�X�N�g�b�v\Book1.xls",
_ FileFormat:=xlNormal, Password:="", _ WriteResPassword:="", _ ReadOnlyRecommended:=False, _ CreateBackup:=False |
|
| End Sub | |
��L�̕��́u�t�@�C���v���u�t�@�C���������ĕۑ��v�̏��������s��������
�ł��B
�`���b�g���Â炢��������܂���ˁB�X�~�}�Z��(^_^;
�����_�ŋ���Ă���܂����ǁA�P�s�̕��ł��B��ԑ厖�Ȃ̂́ASave As
�̕����ł��ˁB�u�t�@�C�����J���v�̂Ƃ��������ł������ǁA�����Ńt�@�C������
�ۑ���̃p�X���w�肵�܂��B�����ł̓f�X�N�g�b�v�ɕۑ����Ă����ݒ�ɂ���
����܂��B
���̂��Ƃɑ����Ă���FileFormat����Password���̂̎w��͓��ɋC�ɂ���
���Ă����ł�(^_^; �R�R�́u�ۑ��v�̍ۂɓ��ɉ����I�v�V�������w�肵�Ȃ�����
�́A�݂ȓ����ɂȂ�͂��ł�����B
�ǂ��ł����H���������삵�܂�����(^^
�ƁA�����łP�e�N�j�b�N�̒lj����B
���̖��߂����x�����s����Ƃ��C�Â��ɂȂ�Ǝv���܂����A�u�㏑�����܂�
���H�v���ă��b�Z�[�W���o��悤�ɂȂ�܂���ˁB�m�F���K�v�ȏꍇ�̓R��
�ł������̂ł����A��ɍŐV�̏�ԂɍX�V���Ă����K�v������ꍇ�A�܂�
�L�������킳���㏑�����Ă��������ꍇ�A�����������b�Z�[�W�͏o�Ăق���
����܂���B
�����ŁA�u���ꂩ��ۑ����悤�Ƃ���t�@�C�����Ɠ����t�@�C���������ɂ�������
������폜���Ă���A�V�����t�@�C����ۑ�����v�Ƃ��������ɂ��Ă݂܂��傤�B
�����A�����łǂ�ȃR�[�h�������Ǝv���܂����H�u�����`��������A�`������v��
�����`�ɂȂ肻���ł�����A�h�e���ɂȂ肻���ł��ˁB
���̒ʂ�ł��B���̓t�@�C�����J���Ƃ��Ƃ��܂�`�͈Ⴂ�܂���B�Ⴄ�̂́A
�u�t�@�C�����J���v�̂Ƃ��́u�`���Ȃ�������v�Ƃ��������ł�����ˁB�����
�u�`����������E�E�v�ł�����A�������f�����傤�Njt�ɂȂ��Ă�Ƃ����R�g�Ȃ�
�ł��B
| Sub File_Save2() | |
| ChDir("C:\WINDOWS\�f�X�N�g�b�v") If Dir("Book1.xls") <>"" Then Kill("Book1.xls") �i�ۑ������j |
|
| End Sub | |
�i�ۑ������j�͐�ɏ����������̂܂܂Ȃ̂ŁA�ȗ����Ă܂��B
ChDir�̕����̏ڂ���������"�t�@�C���ۑ�"�̍����������������Ƃ��āA
<>""�̕\���ł���ˁB�������肢�������܂��ł��傤��(^_^;
����f�B���N�g���ɑ���"�łȂ�"��"�t�@�C�������݂���"�Ƃ����R�g��
��ł����ǁA���X�ɂ��������\���ɂ�����Ă����K�v������܂��̂�(^_^;
���̂��Ƃ�"�t�@�C�����폜"�̕��ł����ǁA���߂�Kill�ł��B�܂�"�E��"
�ł��B�����ł���(^_^; ���N�ƍ߂��������Ă��钆�A���܂�ߌ��ȕ\����
�g�������Ȃ��̂ł����ǁB
�Ƃ��������̖��߂�"�t�@�C�����x���Ȃ��ɍ폜����"���߂Ȗ�ł��B
������u�ⓚ���p�v���Ă�ł��ˁB
���H�܂��܂����o�C�H
����ȏ㏑���ƒE�����Ă��܂������Ȃ̂ŁA�ȏ�{���͂����܂Ł`
 |
 |
TOP �� �u�a�`���N������ �`Part 1�`