6月30日まで 新規会員登録とパッケージ出品で 2000円割引クーポンプレゼント! ※無くなり次第終了 ご利用方法
urococoro

urococoro

VBA専門でしばらくやっていく所存です。


  • 本人確認
  • 機密保持確認
  • 電話確認
  • ランサーズチェック

実績数

1

評価

1

0

完了率

100 %

リピーター

---

自己紹介

VBA専門でしばらくやっていく所存です。

本業は企業所属・在宅で事務作業をしています。
仕事をしているうちにVBAマクロ作成が好きになり、いろんなパターンを経験して勉強したいと思っています。
本業では繰り返し作業の自動化、大量のファイルの自動作成やコピー、関数自動生成などで活用しています。作業例はプロフィール下部のビジネス経験をご覧ください。

自己紹介代わりに以前作成したVBAを初めて触る人へ向けた導入部分のマニュアルから一部を掲載します。
処理内容自体はシンプルな物ですが、コメント部分('記号以下)を説明能力などの参考にしていただければと思います。
実際の作業でも説明コメントをお付けしますし、お渡しして分かりづらいようであればリライトします。

【以下、自作のマニュアルから一部抜粋】
・Do~Loop
Do~Loopは条件を満たすまで同じ操作を繰り返すマクロです。

【マクロ内容】
‘初期位置を設定。A列の1行目に設定
Range(“A1”).Activate
‘A1セルに初期値1を入れる
ActiveCell.Value=”1”
‘A2に移動
ActiveCell.Offset(1,0).Activate

‘ループの開始にDoと記述。Do~Loop間の処理が繰り返される
‘条件はUntil以降の記述
'ActiveCell.Offset(-1,0).Value=”10”;アクティブセルの一つ上が10になるまで(10になったら処理が止まる)
Do Until ActiveCell.Offset(-1,0).Value=”10”
ActiveCell.Value=ActiveCell.Offset(-1,0).Value+1
‘ActiveCell.Value:現在のセル
‘ActiveCell.Offset(-1,0):現在のセルの一つ上のセル。現在のセルに入れたい数値より1小さい数が入っている想定
‘.Valueで二つのセルの内容を参照する
‘現在のセルの内容は⇒一つ上のセルに+1したもの、という記述
Activecell.Offset(1,0).Activate
‘一つ下のセル(空欄の想定)に移動した後、Do以下の処理を条件を満たすまで繰り返す
Loop
‘処理の最後をLoopで閉じる

稼働時間の目安
仕事できます
稼働単価の目安
基本単価:
1,500 円 / 時間
得意なカテゴリ
Excelマクロ作成・VBA開発
得意なスキル
Excel 5年
登録日
2020年4月20日
メッセージ返信率
95%
メッセージ通知
お知らせ
メールの受信
見積もり・仕事の相談

料金表

見積もり・仕事の相談

実績・評価

よくある質問 by ランサーズチェック

作業をするパソコンはウイルス対策が行われていますか?
はい
作業をするパソコンは共有ではないか、パスワードが設定されていますか?
はい
メールの確認頻度は?
毎日
一日に作業ができる時間(1週間平均)はどれくらいありますか?
1~3時間
著作権などの知的財産権について理解し、提案や仕事内容に権利侵犯がないか注意していますか?
はい
個人情報保護について理解していますか?
はい
業務委託契約や秘密保持契約などの契約を結ぶことができますか?
はい
プロジェクト開始後など、必要であれば情報を交換し、電話などでも連絡できますか?
できる
見積書や請求書などが必要であれば、作成できますか?
はい
ランサーズの利用規約や各種ルールを理解していますか?
はい
このプロフィールを通報する

こちらをお探しですか?

メッセージをする

最終ログイン:30日前以上 稼働時間の目安:仕事できます