gennyaのプロフィール

@gennya gennya
ありがとう数165
質問数333
回答数216
ベストアンサー数
16
ベストアンサー率
15%
お礼率
90%

  • 登録日2017/04/01
  • 性別男性
  • 都道府県山口県
  • 報酬付き

    漫画家さんでXやってない人なんています?

    担当の人に言われてるんでしょうか? 情報拡散のために、本人垢か、作品垢か、どっちかはほとんどやってますよね?

  • 報酬付き

    全知全能の神が創造した物

    全知全能の神が創造した物資的な物(漫画/マンガ/コミック、アニメ、ゲーム、フィギュア、ファンアート/イラスト)は全て著作権にあたりますか?

  • 報酬付き

    事故をおこされた際に貰える保険金について

    自分が被害者で10:0 の事故を起こされた場合、 修理代は全額払ってもらえるとして、 事故車になった事による売却額の減少についても 保証してもらえるものなのでしょうか? ご回答お願いします。

  • 報酬付き

    階層の多数あるフォルダの統合

    同様の質問を先般致しましたが、 わかりにくかったかもしれませんでしたので あらためて質問させてくださいませ CドライブのフォルダAには フォルダ 1,1(2),1(3),,1(5)のように フォルダがあり、その下層には さらにサブフォルダが以下のようにあります。 すべてのフォルダ名は数字で表現されてますが、 数字の桁数が5桁以下のフォルダであれば、各フォルダには サブフォルダはさらには存在せず、jpgファイルが数個あります。 数字の桁数が6桁以上のフォルダであれば、添付ファイルで 示されたように更にサブフォルダが存在します。 ここで5桁以下の数字で表されているフォルダだけ、 まとめて統合したフォルダUにコピペしたいというのが主旨です。 しかしながら、同名の5桁フォルダがあり、上書きはしないで、フォルダ内の jpgファイル名を4000jpg,4000(1)jpgのように別ファイル名として残したいのです。 この場合のVBAまたはジェイソンファイルなどでのコードを 御教示いただきたく存じます 宜しくお願い致します win10 C:. │ │ ├─1 │ ├─2 │ │ ├─13561 │ │ │ 4843.jpg │ │ │ 4844.jpg │ │ │ 4845.jpg │ │ │ │ │ ├─36158 │ │ │ 4846.jpg │ │ │ 4847.jpg │ │ │ 4848.jpg │ │ │ │ │ ├─40068 │ │ │ 4840.jpg │ │ │ 4841.jpg │ │ │ 4842.jpg │ │ │ │ │ └─40069 │ │ 4837.jpg │ │ 4838.jpg │ │ 4839.jpg │ │ │ ├─2 (2) │ │ ├─10647 │ │ │ 4578.jpg │ │ │ 4579.jpg │ │ │ 4580.jpg │ │ │ 4581.jpg │ │ │ │ │ ├─11814 │ │ │ 4552.jpg │ │ │ 4553.jpg │ │ │ 4554.jpg │ │ │ 4555.jpg │ │ │ │ │ ├─13412 │ │ │ 4560.jpg │ │ │ 4561.jpg │ │ │ 4562.jpg │ │ │ │ │ ├─18001 │ │ │ 4556.jpg │ │ │ 4557.jpg │ │ │ 4558.jpg │ │ │ 4559.jpg │ │ │ │ │ ├─3541 │ │ │ 4566.jpg │ │ │ 4567.jpg │ │ │ 4568.jpg │ │ │ 4569.jpg │ │ │ 4570.jpg │ │ │ 4571.jpg │ │ │ │ │ ├─35488 │ │ │ 4605.jpg │ │ │ 4606.jpg │ │ │ 4607.jpg │ │ │ 4608.jpg │ │ │ 4609.jpg │ │ │ 4610.jpg │ │ │ │ │ ├─35554 │ │ │ 4582.jpg │ │ │ 4583.jpg │ │ │ 4584.jpg │ │ │ 4585.jpg │ │ │ 4586.jpg │ │ │ │ │ ├─36666 │ │ │ 4512.jpg │ │ │ 4513.jpg │ │ │ 4514.jpg │ │ │ 4515.jpg │ │ │ 4516.jpg │ │ │ 4517.jpg │ │ │ 4518.jpg │ │ │ │ │ ├─37119 │ │ │ 4596.jpg │ │ │ 4597.jpg │ │ │ 4598.jpg │ │ │ │ │ ├─37310 │ │ │ 4611.jpg │ │ │ 4612.jpg │ │ │ 4613.jpg │ │ │ 4614.jpg │ │ │ 4615.jpg │ │ │ │ │ ├─39443 │ │ │ 4616.jpg │ │ │ 4617.jpg │ │ │ 4618.jpg │ │ │ 4619.jpg │ │ │ │ │ ├─39716 │ │ │ 4522.jpg │ │ │ 4523.jpg │ │ │ 4524.jpg │ │ │ 4525.jpg │ │ │ │ │ ├─40013 │ │ │ 4531.jpg │ │ │ 4532.jpg │ │ │ 4533.jpg │ │ │ 4534.jpg │ │ │ 4535.jpg │ │ │ 4536.jpg │ │ │ 4537.jpg │ │ │ 4538.jpg │ │ │ │ │ ├─40035 │ │ │ 4519.jpg │ │ │ 4520.jpg │ │ │ 4521.jpg │ │ │ │ │ ├─40036 │ │ │ 4539.jpg │ │ │ 4540.jpg │ │ │ 4541.jpg │ │ │ │ │ ├─40037 │ │ │ 4549.jpg │ │ │ 4550.jpg │ │ │ 4551.jpg │ │ │ │ │ ├─40038 │ │ │ 4572.jpg │ │ │ 4573.jpg │ │ │ 4574.jpg │ │ │ │ │ ├─40039 │ │ │ 4563.jpg │ │ │ 4564.jpg │ │ │ 4565.jpg │ │ │ │ │ ├─40040 │ │ │ 4602.jpg │ │ │ 4603.jpg │ │ │ 4604.jpg │ │ │ ---------------- ---------------- │ │ │ ├─40026 │ │ 4406.jpg │ │ 4407.jpg │ │ 4408.jpg │ │ 4409.jpg │ │ 4410.jpg │ │ │ ├─40027 │ │ 4401.jpg │ │ 4402.jpg │ │ 4403.jpg │ │ │ └─9361 │ 4423.jpg │ 4424.jpg │ 4425.jpg │ 4426.jpg │ 4427.jpg │ └─20201031 ├─13653 │ 4473.jpg │ 4474.jpg │ 4475.jpg │ 4476.jpg │ 4477.jpg │ ├─17823 │ 4478.jpg │ 4479.jpg │ 4480.jpg │ 4481.jpg │ ├─21209 │ 4499.jpg │ 4500.jpg・・・

  • 報酬付き

    階層の多数あるフォルダの統合

    同様の質問を先般致しましたが、 わかりにくかったかもしれませんでしたので あらためて質問させてくださいませ CドライブのフォルダAには フォルダ 1,1(2),1(3),,1(5)のように フォルダがあり、その下層には さらにサブフォルダが以下のようにあります。 すべてのフォルダ名は数字で表現されてますが、 数字の桁数が5桁以下のフォルダであれば、各フォルダには サブフォルダはさらには存在せず、jpgファイルが数個あります。 数字の桁数が6桁以上のフォルダであれば、添付ファイルで 示されたように更にサブフォルダが存在します。 ここで5桁以下の数字で表されているフォルダだけ、 まとめて統合したフォルダUにコピペしたいというのが主旨です。 しかしながら、同名の5桁フォルダがあり、上書きはしないで、フォルダ内の jpgファイル名を4000jpg,4000(1)jpgのように別ファイル名として残したいのです。 この場合のVBAまたはジェイソンファイルなどでのコードを 御教示いただきたく存じます 宜しくお願い致します win10 C:. │ │ ├─1 │ ├─2 │ │ ├─13561 │ │ │ 4843.jpg │ │ │ 4844.jpg │ │ │ 4845.jpg │ │ │ │ │ ├─36158 │ │ │ 4846.jpg │ │ │ 4847.jpg │ │ │ 4848.jpg │ │ │ │ │ ├─40068 │ │ │ 4840.jpg │ │ │ 4841.jpg │ │ │ 4842.jpg │ │ │ │ │ └─40069 │ │ 4837.jpg │ │ 4838.jpg │ │ 4839.jpg │ │ │ ├─2 (2) │ │ ├─10647 │ │ │ 4578.jpg │ │ │ 4579.jpg │ │ │ 4580.jpg │ │ │ 4581.jpg │ │ │ │ │ ├─11814 │ │ │ 4552.jpg │ │ │ 4553.jpg │ │ │ 4554.jpg │ │ │ 4555.jpg │ │ │ │ │ ├─13412 │ │ │ 4560.jpg │ │ │ 4561.jpg │ │ │ 4562.jpg │ │ │ │ │ ├─18001 │ │ │ 4556.jpg │ │ │ 4557.jpg │ │ │ 4558.jpg │ │ │ 4559.jpg │ │ │ │ │ ├─3541 │ │ │ 4566.jpg │ │ │ 4567.jpg │ │ │ 4568.jpg │ │ │ 4569.jpg │ │ │ 4570.jpg │ │ │ 4571.jpg │ │ │ │ │ ├─35488 │ │ │ 4605.jpg │ │ │ 4606.jpg │ │ │ 4607.jpg │ │ │ 4608.jpg │ │ │ 4609.jpg │ │ │ 4610.jpg │ │ │ │ │ ├─35554 │ │ │ 4582.jpg │ │ │ 4583.jpg │ │ │ 4584.jpg │ │ │ 4585.jpg │ │ │ 4586.jpg │ │ │ │ │ ├─36666 │ │ │ 4512.jpg │ │ │ 4513.jpg │ │ │ 4514.jpg │ │ │ 4515.jpg │ │ │ 4516.jpg │ │ │ 4517.jpg │ │ │ 4518.jpg │ │ │ │ │ ├─37119 │ │ │ 4596.jpg │ │ │ 4597.jpg │ │ │ 4598.jpg │ │ │ │ │ ├─37310 │ │ │ 4611.jpg │ │ │ 4612.jpg │ │ │ 4613.jpg │ │ │ 4614.jpg │ │ │ 4615.jpg │ │ │ │ │ ├─39443 │ │ │ 4616.jpg │ │ │ 4617.jpg │ │ │ 4618.jpg │ │ │ 4619.jpg │ │ │ │ │ ├─39716 │ │ │ 4522.jpg │ │ │ 4523.jpg │ │ │ 4524.jpg │ │ │ 4525.jpg │ │ │ │ │ ├─40013 │ │ │ 4531.jpg │ │ │ 4532.jpg │ │ │ 4533.jpg │ │ │ 4534.jpg │ │ │ 4535.jpg │ │ │ 4536.jpg │ │ │ 4537.jpg │ │ │ 4538.jpg │ │ │ │ │ ├─40035 │ │ │ 4519.jpg │ │ │ 4520.jpg │ │ │ 4521.jpg │ │ │ │ │ ├─40036 │ │ │ 4539.jpg │ │ │ 4540.jpg │ │ │ 4541.jpg │ │ │ │ │ ├─40037 │ │ │ 4549.jpg │ │ │ 4550.jpg │ │ │ 4551.jpg │ │ │ │ │ ├─40038 │ │ │ 4572.jpg │ │ │ 4573.jpg │ │ │ 4574.jpg │ │ │ │ │ ├─40039 │ │ │ 4563.jpg │ │ │ 4564.jpg │ │ │ 4565.jpg │ │ │ │ │ ├─40040 │ │ │ 4602.jpg │ │ │ 4603.jpg │ │ │ 4604.jpg │ │ │ ---------------- ---------------- │ │ │ ├─40026 │ │ 4406.jpg │ │ 4407.jpg │ │ 4408.jpg │ │ 4409.jpg │ │ 4410.jpg │ │ │ ├─40027 │ │ 4401.jpg │ │ 4402.jpg │ │ 4403.jpg │ │ │ └─9361 │ 4423.jpg │ 4424.jpg │ 4425.jpg │ 4426.jpg │ 4427.jpg │ └─20201031 ├─13653 │ 4473.jpg │ 4474.jpg │ 4475.jpg │ 4476.jpg │ 4477.jpg │ ├─17823 │ 4478.jpg │ 4479.jpg │ 4480.jpg │ 4481.jpg │ ├─21209 │ 4499.jpg │ 4500.jpg・・・