  |
はてなキーワード: Excelとは
自分が作ったExcelツールを無保証で提供することはあるけどな
カスタマイズしたいなら自分で勉強しろ、相談にはのってやるくらいのポジション
世の中いくらでも情報が転がってるのに学ぼうとしない奴らに媚び売る必要は無いんじゃんよ
もちろん、自分が持ってないスキルを持ってる人にはちゃんとコミュニケーションとって（＝恩を売って）いざというときは助けてもらうけどな
まずな「本番環境」「テスト環境」なる区分けがあるようなデータベースにSQLでアクセスできる想定が笑かしてくれる
それが出来る設定を誰に聞くんだ？
んでな、事務屋が単独で管理運用できるやつなら、作業前にファイルコピーすりゃいいよ
本題だが
マクロなんて触れなくても、Excelのvlookupが出来るだけで、重宝されるよ
Accessで入力フォームなんて作れちゃったら、薄給だけどそれで食ってけるよ
中途半端にPythonかじるくらいなら、MSOffice使いになれ
それで十分だよ
そういう意味じゃExcelマクロも事務屋にはやらせるべきじゃないが
全くの未経験だったら、取りあえずＩＴパスポート取って、次にMOS取って、それから Python でもやってみるといいかも。Excel で Python 使えるわけだし。
多くの人たちはこのへんで既にふうふう言ってたり投げ出したりするという現実があるわけで、これくらいのハードルは楽勝でクリアできないとプログラミングどころじゃないんだよね。だけど、ここまでできれば事務職としては武器になるだろうと思う。
あと、事務職なら簿記の２級は取っておくべし。（未経験なら３級からスタート）
もちろんプログラミングの勉強は上記の勉強とは別立てで並行してね。
で、次の段階が基本情報技術者試験かな。ここで苦労したり挫折したりするようだとプログラマーとしては先行きは暗いかも。（事務職なら基本情報技術者試験は要りません。オーバースペックです。）
結論から言うと「やっぱりWeb系がいい。SIerは正直ゴミ」です。
今ではそこまで「SIerも悪くないよ」とか言われますが、個人的には普通にゴミだなと思ってしまいました。
私の感じた違いは以下のあたりです。
・朝から晩まで新聞読んでたりお菓子食ってたりダベってたりして仕事しないオッサンが少なくて、快適。
・「やります〜」って言って、すぐできることなのに無駄にダラダラして仕事引き伸ばして、実際にやるまでに７時間位掛かるような人が少ない。
・社内政治のため（上司のご機嫌取りとか）の仕事をする人が少ない。
・金さえもらえればプロダクトに興味ないとか、クライアントに興味ない、いわゆる「やる気のない人」が少ない。
・Excelの誤字脱字をひたすらチェックするような虚無感の強い仕事が少ない。
・「こんな古くさい技術、他の何のプロジェクトで使うねん」っていう枯れた技術をあまり使わない。（ゼロではない）
・作業スペースが広い。オフィスがきれい。女子が多い。総務の人がかわいい。（SIerにも可愛い総務の人はいました。）
・開発用PCに色々と楽にインストールとかできる。いちいち申請とかいらない。
セキュリティも基本的には社員を信用する形にしてるので、ルールがガチガチじゃなくて快適です。
・上の話にも通じるが、勤怠のルールもゆるい事が多い。
正直多少給料が下がったとしても、人生全体の満足度が大きく違うので、Web系の方が全然良いです、というか
エンジニアリングっぽいことをして帰った夜と、誰でも出来るエクセルの編集作業をして帰った夜では全く感覚が違う。
と少なくとも私は思いました。
とにかく、働いているエンジニアの層が違う。
自己研鑽して技術を身につけようとしてる人がWeb系には多いし、
ゴルフ始めて上司や客に気に入られようとしてる人がSIerには多い。
仕事のやり方とかは、Web系の方が人に依存しすぎてて運用ぐだってたりしますし。
その点SIerは「誰でも出来るようにする」ことに力を注いでいるので
まあでも、普通にやる気がなくてサボるオッサンがチームにいないだけで快適度が違いました。
となりで永遠に天を仰いでたりお菓子食ってたり新聞読んでる人がいると、本当に「なんだコイツ？」ってなるので。
仕事しないなら帰ってくれ。
Excelはマクロ/VBA/処理自動化なんかを扱った本がたくさん出版されてるので、職場が物理書籍持ち込みOKなら特に悩む必要ないと思う
情報が断片化されたりコンテキストが抜けてたりゴミみたなコピペ記事ばかりなネットの情報より良い場合もある
Excel 2016でマクロを作成するための効率的な手順は次のようになります。
1. マクロの目的を明確にする: まず、どのような作業を自動化したいか、具体的な目的を明確にしましょう。
2. Excelのマクロ機能を学習: Excelの「開発」タブにアクセスし、マクロを記録、編集、実行するためのツールを見つけましょう。基本的なマクロの操作に慣れることが重要です。
3. マクロの記録: 自動化したいタスクを実際に手動で実行し、その間にマクロを記録します。こうすることで、マクロはあなたのアクションを記録し、後で再現できます。
4. マクロの編集: 録画したマクロは最適化が必要な場合があります。不要なステップを削除し、必要なステップを追加または調整します。
5. マクロのテスト: マクロが期待通りに動作することを確認するために、テストを行います。特にループや条件分岐が含まれる場合、注意が必要です。
6. ショートカットの割り当て: マクロにキーボードショートカットを割り当てることで、手動でマクロを起動する手間を省けます。
7. セキュリティと共有: 職場のセキュリティポリシーに従い、マクロをセキュアに管理し、必要なユーザーと共有します。
8. ドキュメンテーション: マクロの動作や使い方を文書化し、他のチームメンバーが理解しやすくするための説明を提供します。
・マイクロソフトオフィス/ウィルスバスター/エッジ以外のソフトは使用禁止
この条件でマクロ作らんとならん。
こういう時になんか効率的な順序ある？
子供の頃BASIC言語でちょっと遊んだから原理そのものは漠然と分かる。
他人が作ったマクロ開いてコピペで機能追加したり二重で処理してる所見つけて早くしたりぐらいは出来る。
流石はてなーだ。
はてなーも質が落ちたと言うが、こういう分野ならまだまだいい感じやね。
②必要な作業を整理して、それだけを出来るようにメモを作り印刷する。
③記録ボタンを押して、印刷したメモを見ながら作業をし、記録完了する。
⑥ググって一通り解説を見て、求めている解説のタイプを把握する。
⑦本屋やKindleで求めているタイプの解説が載っている本を買う。
⑪持ち込んだ紙を見ながら職場のマクロを改修する（この辺雑誌見ながらBASICのゲーム作るアレじゃねえか。令和に何やろうとしてんだろ俺）。
⑫改修版のマクロを動かしてみる。
⑬不満点やバグを洗い出して家に帰ってまた調べる。
⑭満足するまで⑫と⑬をループ。
って感じかあ。
うんこれで良さそうね。
あとは中古のPC買うかWEBのOfficeで代用できるか最新の３６５でもある程度再現出来るのか調べてみて家でPTSDサイクル作れるようにしたらモアベターかね。
職場（ネット環境なし）でトライ＆エラーはしたいから逆引き辞典みたいのはやっぱ欲しい気はするが。
でもウチの職場でVBA本読むのも自分のスマホで調べ物するのも周囲からの白い目はあんま変わらなそうな気がするんよね……。
職場辞めろについてはマジでその通りなんだけど、今の「Excelでマクロを作るだって？そんなの出来るわけねえぜ！俺たち方眼紙魔術師がマクロに手を出したら神罰が下るぞ？」なしょっぼーい環境に慣れちゃってるから他所で上手くやれる自信がないのよね。
じゃあこの会社潰れたらどうすんのって話ではあるんだけどねえ。
どうするんだろうね。
こんな使えないオッチャンになっちゃってねえ。
アハハ（ちいかわっぽい感じで
ロジカルシンキングを学んでください。スキルとか資格の勉強する前にこれ。
下記読んでしっかり理解してください。
https://www.amazon.co.jp/dp/B084VK5BY5
難しそうな内容ですが、ゆっくりじっくり読めば、理解できるはず。
別の方法を参考ください。。
仕事ができない人＝頑張っているつもりだが、周りに迷惑を掛けてしまう人
上記の定義で進めます。そもそも「やる気がない人」はどう周りが頑張っても、難しい場合が多いです。
なので、これは「本人」向けです。周囲や後輩育成にもある程度の効果は発揮すると思いますが、結局はその「本人」次第です。
念のため書いておきますが、いわゆる「サラリーマン」の人向けです。
また、「仕事ができる人」にはならないです。あくまで「普通に仕事がこなせるようになる」レベルです。勘違いしないでください。
ロジカルシンキングとは、一貫していて筋が通っている考え方、あるいは説明の仕方のことである。日本語訳として論理思考あるいは論理的思考と置き換えられることが多い。
では仕事に置き換えて考えてみましょう。
・その利益を生むために、サービスやプロダクトを生産し、販売します。
・サービスやプロダクトの生産→販売を円滑に行うために、部署やチーム単位に分割し役割を与えます。
・必要なタスクを実行するために、メンバーにタスクが割り当てられます。
そしてやっと、メンバーがタスクを遂行する、という流れになっています。
※当たり前ですが、この流れに沿わない職種や仕事も存在します。
そしてそれぞれの段階でゴールや目的、それらを設定した背景や意図が存在します。
雑に言うと、会社/部署/チームからは「この一貫の流れを汲み取りながらタスクを遂行すること」がメンバーには求められています。
さらには、タスクを遂行することで「設定したゴールや目的を達成すること」が求められています。
※もちろん一つのタスクで達成することはほぼなく、他のタスク（自分や他人、他部署/チームの含む）と複合して達成となる場合が多いです。
仕事ができない人は、この全てを意識していません。自分に振り当てられたタスクのみに集中し、それをこなすことだけに集中します。
もちろんタスクをこなすことは重要ですが、会社側が求めている水準に達していないことが、これまでの流れでわかると思います。
前段でロジカルシンキングの意味を書きましたが、ざっくり仕事に当てはめると「目的や背景、見えない意図等をしっかり理解/把握しながら、一貫性を持って仕事を進めていく」ことができれば、普通に働けるようになります。
・Bさんは集計ツールはある程度触れます（使い方のマニュアルも存在する）
・任された仕事については手順書等はありません
この後のBさんの行動によって、仕事ができる/できないに別れます。
仕事ができない人は、大きく下記２つの行動を取ることが多いです。
※「仕事ができない人」という言い方はとても嫌いですが、簡潔に説明するためにあえて使用させてください。
①自分がわかる範囲で、必要だと思うものを想像して資料を作成する
②Aさんに手順書を求める
仕事ができない人が絶対にやってはいけないことは、「想像して～する」ことです。
「あなたが必要だと思うもの」を集計するのではなく、「Aさんが必要なもの」を集計してください。そして「Aさんが必要なもの」を想像して取り掛かるのではなく、Aさんに確認して取り掛かってください。
確認するポイントは、よく使われる5W1Hで整理しますが、それだけでは不十分な場合も多いです。5W1Hを肉付けする情報が、前述の「目的や背景・意図」です。
以下例です。
・タスクの背景：商品のラインナップが流行に乗れていないと感じている
・タスクの意図：来期の取扱商品の方向性を、現在の売上を基に検討したい
・「売れ線商品を把握」するのが目的であれば、全商品の売上を集計しなくてもよいな
→・集計の幅としては売上TOP30くらいで良いかな？
→・自社の売上だけでなく、競合の情報もあると喜ばれるかも
・Aさんのその次のアクションが「検討」なのであれば、資料を作り込む必要まではないな
→・Excelベースで良さそうだが、ポイントの整理はしておこう
もちろん、集計の中身（何を集計するか）についても具体的に5W1Hで整理する必要はありますが、それだけでは見えてこない情報（背景など）が手に入ります。
何より、Aさんが求めていた「タスクの完了」状態について意識が揃うため、Bさん：完了→Aさん：ここ直して、のやり取りのボリュームや頻度が圧倒的に減ります。
仕事ができない人は、このやり取りのボリューム（修正の度合い）と頻度（完了→直しての回数）がとても多く、その間にAさんに「Bさんは仕事ができない」と思われてしまうのです。
整理すると
与えられたタスクに対して、「あなたが必要だと思うもの」を勝手に想像して取り掛かることは、絶対にしてはいけません。
「Aさんが必要なもの」を（目的や背景・意図を確認した上で、Aさんが必要だと思うことを想像し）Aさんに確認した上で、やっとタスクに取り掛かってください。
ちなみに、仕事ができる人が上記のようなことを毎回確認しないのは、MTG等ですでに確認している、もしくは会社/部署の目標とタスクがどう紐づいているか理解している（流れの一貫性を理解/把握している）からです。上からの一貫性を理解/把握するためには「目的や背景/意図」が必須となります。
この辺は慣れです。
※「この仕事やる意味があるのか…？」と疑問を持ち始め、中々手が進まない人も上記しっかり確認するようにしてください。「意味があるのか？」は適切な疑問ですが、”確認せずに手を止めてしまう”ことがダメです。
「Aさんに手順書を求める」とは、手順書が存在するのかという確認ではありません。その確認は何も間違っていません。
ここで言いたいのは、「手順書が無いと取り掛かれないので、用意して私にください」という意味です。
このような直球で伝えてくる人は少ないと思いますが、「具体的な指示が欲しい」と伝えてくる人は多いのではないでしょうか？
Aさんが曖昧な指示しか出さないのであれば、正当な要求です。ただその要求の度合いが「手順書」の範囲ではないか、注意が必要です。
Aさんに伝えるべきは、「具体的な指示が欲しい」ではなく、「作業に取り掛かるべく、必要な情報が欲しい」です。必要な情報は①に大きく関連しています。
「作業」とは、「ルーチンワークを言われた通りにこなすこと」です。 どんなに丁寧に、真面 目な態度であっても、上司に言われたことをそのまま形にしているだけでは「作業」の域を出ま せん。 「仕事」とは、上から指示されたことを完成させた上で、さらに「これでいいのか」と疑問を 持って、自分なりの⼯夫を施していくこと。
このような違いがあるそうですが、今回はもっと簡単に定義します。
※大きく仕事の中に作業も含まれることも多いですが、以降便宜上分けさせてください。
今回の「担当するECサイトの売上の集計」は仕事です。なぜなら手順書等が存在せず、作業ではないからです。
※手順書等があり、ルーチンワークであるのであれば、作業です。
つまり、「何を、どれだけ、どうやって」等のことを、自分で考て取り組む必要があります。仕事とはそこも含まれるのです。
整理すると
仕事は「何を、どれだけ、どうやって」等のことを、自分で考て取り組むものです。
「それらを考えるために必要な情報」をAさんに求める必要があり、決して「手順書」を求めてはいけません。
※「具体的な指示」も程度によっては「手順書」に近い意味になる/捉えられるので、注意が必要です。
特殊な職種（専門職や専門資格が必須等）、レベルが高すぎる職場、サラリーマン以外を除けば、ロジカルシンキングさえ出来ていれば、大抵のことは普通にこなせるようになります。簡単に言えば、なんとかなります。
仕事を進める上で困難が降り掛かっても、そのポイントを見抜けるようになります。ポイントが見えてくると、適切な対処も見えてきます。後は一人で抱え込まずに、上司や同僚をしっかり頼りましょう。
ただ要注意なのが、ブラック企業、ブラック上司、無能な上司です。
どんなに優秀でも、上がブラック/無能であれば、一声で仕事ができない人に成り下がります。絶対に避けてください。
思考がぐちゃぐちゃになり、自分が間違っているかも…と思い詰めてしまいます。ぐちゃぐちゃなのは、あなたの思考ではなく、上です。間違っているのは必ずしもBさんではなく、周りの環境である可能性もあります。
それらの見極めができるよう、ロジカルシンキングをしっかり身につけましょう。
長々書いた上にくどいようですが、ロジカルシンキングだけで「仕事ができる人」にはならないです。あくまで「普通に働けるようになる」レベルです。
ただ大手企業ですら、ロジカルシンキングをしっかり身につけている人は、個人的な観測上少ないです。しっかり身につけられれば、環境によってはそれだけで「仕事ができる人」と評価されることすらあります。ただ、それは相対的な評価であることに注意が必要です。
なので全サラリーマンはロジカルシンキングをしっかり学び、身につけるべきだと考えています。もちろん紹介した書籍を読むだけでは不十分で、その思考で仕事に取り組み続けることで身につき、さらに磨かれていきます。
仕事ができないから、スキルを磨いたり資格の勉強、とにかく経験を積むという選択肢を取る人も多いですが、個人的には間違っていると思います。
まず足りないものはロジカルシンキング、ということが非常に多いです。仕事の対応範囲を広げる、スピードを上げる、クオリティを上げるために、スキルや資格の勉強、経験を積むべきです。
「仕事ができるようになりたい」という解像度では、遠回りの選択をしてしまいます。自分に足りてないものを見極め、優先度をつけて実施するために、ロジカルシンキングをまずは身につけましょう。身につけた前後では、効率も全然違ってきます。
個人的には「仕事」における全ての土台だと思っています。備わってなければ苦労して当然です。まじで人生変わるので、騙されたと思って勉強してみてください。これに限っては損は一つもないです。
ロジカルシンキングなんて当然身についているよ、と思いながらここまで読み進めた人も多いと思います。ただ上述したように、大手企業でも（ベンチャーでも）しっかり身につけている人は少ない印象です。
「身についていると思っている」状態ではありませんか？
数時間の研修を受けただけで「身についている」「そんな当たり前のことわかってる」と思っていませんか？
その程度（時間）の研修の大抵が「当たり前のこと」＋「フレームワーク」の紹介で終わります。全然足りないです。
自分も新人時代、ロジカルシンキングに関連する数時間の研修を複数回受けましたが、紹介した書籍の10%くらいの内容でした。残り90%にも大事な部分が含まれています。
わかった気になるのはもったいないです。
※ちなみにこの文章は書籍の1%の内容にも満たないと思います。
当時かっこいいという理由だけでバイトしていた、ベンチャー企業の事務（営業のサポート）が全くできませんでした。薄々自分が仕事できない側だとは気づいていましたが、これほどまでかと打ちのめされ、涙ぐみながら色々調べた結果この本と出会いました。
※バイト先の人はとても優秀で優しかったです。なので余計に自分の無能さが浮き彫りとなりました。
高校まではもちろん、大学の講義でも学んだことはなかったため、全てが目からウロコ状態でした。
何度も読み直し、しっかり頭に叩き込んだ上で、卒業までの１年間のアルバイト、新卒から現在までの仕事に取り組みました。なので幸いこれまで「仕事ができない」と自分自身思ったこと/評価されたことはありません。もちろん仕事ができるとも思ってないですが、普通に働けています。
年収1000万っていうと強い職業に就いてるか強い会社に勤めてる人じゃないと超えられないであろう、自分には遠すぎるラインだと思っていたら意外とそうでもなかった話。
私は首都圏中小企業のアラフォー平社員なので年収は500万円未満くらい。仕事はまあまあ平和。
まあそんなもんだよな…って感じなんだけど、コツコツやってる株やFX、競馬の収入が昨年度で600万円くらいあって「これを足したら年収4桁まんえん名乗っていいんじゃね！？」と気づいて興奮した勢いでこの記事を書いています。収入から競馬を除外したらもうちょい乗ると思う。やめらんねえよ競馬
そうして年収1000万人（いっぽんちゅと読むこともある）の仲間入りを果たしたことにした私は、強そうな職業の代表とされる医者や弁護士の仕事内容と勤務時間を調べた。自分には無理だと思った。
そもそもそういった職業に就く資格すらないけど、それにしたってあれだけ苦労してやっとそれくらいなんだ…って思った。自分にはやっぱり無理だと思った。
そういったある種の無力感は、雲の上と思っていた人々と（少なくとも収入面においては）肩を並べられているという事実と相性がいい。
今だいぶフワフワとしたことを言ったのだけど、要するに「え！？そんな大事なアイテムがこんな簡単に手に入っていいの！？」っていうような、確かに現実なんだけど、どこか現実味のないワクワク感のことを言っています。そういう経験ないですか？それです
そういったワクワク感を得た興奮のままにこうしてフワフワしたことを書いています。ところでワクワクとフワフワってぱっと見で区別つきますか？意外とつくね よかったね
だいたい生きているだけで税金を持っていかれがちな世界なので、株も例外ではなくアガリの2割を持っていかれるのだけど、所得税よりはオトクじゃんって思った。
そう考えるとオトクっぽくてうれしい。よかったね
株も例外ではないって言ったけどNISAあるから例外あるじゃんね。
株は好きな株をいい感じのときに買っていい感じになったら売ってる。長期値上がり目的と配当金目的で現物を持っておき、それを担保に信用取引でコツコツやってる。まあまあうまくいってる。
FXは自動売買サービスを利用したら勝手にいい感じになった。売買に自分の意志が入らないのはそれだけで強いんだなって思った。株も自分の意志をなるべく介在させないほうが儲かるんだろうなって思う。
そもそも金額を考えると会社員収入のほうが副収入ではないのかしら。そこは気持ちの問題かも。
普段用口座に100万円あれば十分すぎる！と叫びながら浮いた金でどんどん株を買ってる。株も形を変えた貯金ってことにした。
まとまったお金が必要になるときに株を現金化すればいいだけだし。そのとき目減りしてるかもしれないリスクがあるってだけだし。
こないだ貯金が1000万円ある人の話を読んで「その金があれば…！」とムズムズしたけど、貯金の数字が精神安定剤になる人もいるか…と考えて落ち着いた。
ただでさえ会社員収入で満足に暮らせていたから、副収入が完全に余剰なんですよね。
デカい家に住みたいわけでも強い車に乗りたいわけでもないし。どうしよう。そもそも1000万円程度じゃデカい家に住めない。
って考えながら生じた利益でまた株を買ってる。ゲーム内スコアを増やしてる感覚になる。
旅行は大好きなので、最近は宿泊先や移動手段のグレードを上げて金を使ってる。快適を金で買う感覚がわかった。
旅先でのメシは「1万円未満なら全部おなじ！」ってことにして好き放題やってる。ケチケチと旅行してた時期があったからその反動でそれがすごく楽しい。けど胃袋には限界があるので意外とそんなお金を使わないなと思った。
浮いた利益をどんどん転がしていくとどんどん増えていって、ｎ年後には株での利益が1000万円に到達するなとか、ｍ年後には総資産が億に到達するのかってExcelのオートフィルで計算するのは楽しいけど現実味がない。
現実味がないながらも「今の会社にはいつまで勤めているのだろうか？」と思う。アーリーリタイアも視野に入るだろうか？とも。
いわゆるFIREを妄想したところで「会社員収入があるから安定した気持ちで安定して利益を出せているんだろうな」っていう面は少なからずあるだろうし、今の職場に見切りつけることになってから考えればいいやってことにした。
ただのサラリーマンが経済強者の仲間入りできたと勝手に勘違いして勝手にはしゃいでるだけの話でした。
AWS上に簡単な労務管理ソフトウェアをReactで内製構築して部署で利用したんだけど
「内製ソフトウェアなので開発に要した人件費を算出して資産計上しなさい」
とかいう指示が降りてきた
以前の労務管理Excelには簡単なマクロが付いていたんだけど資産計上されていない
「数式なら必要ないの？VLOOKUPならどうなるの？」
とか聞いたら持ち帰り検討になって返事が来ない
これ、同じ理屈なら業務利用するパワポの資料だって、それに使うテンプレートだって資産計上必要なんじゃないの
使って1年以内に捨てるなら必要無い、ってことならテンプレートは資産計上必要だし
https://chat.openai.com/share/c80d83ea-752b-4561-a162-7ea0bd116d56
Option Explicit
Dim objExcel, objWorkbook, objWorksheet
Dim strFolderPath, strSourceFile, strTargetFile, strSearchString, strReplaceString
Dim intLastRow, intRow, intColumn
Set objExcel = CreateObject("Excel.Application")
strFolderPath = ".\" ' スクリプトと同じフォルダにあることを仮定
strSourceFile = "変更一覧.xlsx"
strTargetFile = "変更一覧.xlsx"
Set objWorkbook = objExcel.Workbooks.Open(strFolderPath & strSourceFile)
objWorkbook.Sheets("1月").Copy , objWorkbook.Sheets("1月").Index
objWorkbook.Sheets("1月 (2)").Name = "2月"
' セルの値の置換
Set objWorksheet = objWorkbook.Sheets("2月")
objWorksheet.Cells(1, 1).Value = Replace(objWorksheet.Cells(1, 1).Value, "1月", "2月")
objWorksheet.Cells(2, 7).Value = Replace(objWorksheet.Cells(2, 7).Value, "2023/2/14", "2023/3/14")
' 最終行の取得
intLastRow = objWorksheet.Cells(objWorksheet.Rows.Count, 1).End(-4162).Row ' xlUp
' 値のクリア
For intRow = 8 To intLastRow
For intColumn = 1 To 6
objWorksheet.Cells(intRow, intColumn).ClearContents
Dim objFSO, objTextFile, strContents, arrLines, arrFields, strNewContents
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile(strFolderPath & "変更一覧.txt", 1)
strContents = objTextFile.ReadAll
objTextFile.Close
arrLines = Split(strContents, vbNewLine)
For Each strContents In arrLines
arrFields = Split(strContents, ",")
For Each strContents In arrFields
If IsNumeric(strContents) Then
strNewContents = strNewContents & "'" & strContents & ","
Else
strNewContents = strNewContents & strContents & ","
End If
strNewContents = Left(strNewContents, Len(strNewContents) - 1) & vbNewLine
' データをシートに貼り付け
Set objWorksheet = objWorkbook.Sheets("2月")
objWorksheet.Cells(1, 8).Value = strNewContents
' セルの値の置換
objWorksheet.Cells(123, 1).Value = Replace(objWorksheet.Cells(123, 1).Value, "F", "FH")
objWorkbook.Save
objWorkbook.Close
objExcel.Quit
