Word VBAでワイルドカードを使ってパターンで超便利な置換をする方法 | 隣IT
前回のおさらい では、まずワイルドカードを使ったパターン検索を復習していきましょう。 前回の記事で作成したプロシージャはこちらです。 Sub findPattern() With Selection.Find .Text = "第?位" .MatchFuzzy = False .MatchWildcards = True Do While .Execute Stop Loop End With End Sub MatchWildcardsプロパティでTrueにすればワイルドカードを使った検索ができるようになります。ただし、MatchFuzzyプロパティと同時にTrueにはできないので、こちらはオフにしましたね。 そして、「第〇位」というワードを検索するという処理になりますね。 パターンで検索した文字列を置換する このプロシージャを置換するように変更していけばよいわけですね。 こちらの記事が
Microsoftが進める「AI民主化」の中身
AIクラウドはMicrosoftだけでなく米Amazon Web Services（AWS）や米Google、米Salesforce.com、米IBMなど、他のクラウド事業者も力を入れている領域だ。こうした競合と比べた場合のMicrosoftの強みはどこにあるのか。それはやはり、ナデラCEOが言う「AI民主化」にあった。同社のAIクラウドを詳しく見ていくと、情報システム部門やエンドユーザーだけでAIを活用できるような仕組みが、至る所に組み込まれていたからだ。 ポイントを解説する前に、まずはMicrosoftのAI戦略の概要を確認しておこう。同社のAIに関する製品やサービスは「AIプラットフォーム」と「データ」そして「アプリケーション」の三つに大別できる（写真2）。Microsoftの説明する図では、AIプラットフォームのことは「インテリジェンス」、アプリケーションのことは「エクスペリエンス
なぜ企業は新卒採用時に「年齢差別」をするのか。
年齢差別 年齢差別とは、労働関係の場面においては、一般に年齢を理由として採用、賃金その他の労働条件につき差別することをいう。特に、法の下の平等を定めた憲法14条1項等との関連で問題となってくる。 （労働政策研究・研修機構） 私は、複数の会社で、新卒採用を手伝っていた。 大量の履歴書を見ると、多くの応募者は、22歳から25歳位の間で、これと言った特徴はない。 何十枚、何百枚という履歴書を精査するのには、恐ろしく時間がかかる上、そこに書かれている情報の真偽は不明で、要するに、「履歴書だけを見ても、よくわからない」。 確かに、書かれている「志望動機」や「自己アピール」は似たようなものが多い。 これだけでは誰を採用すべきかの判断は難しい。 強いて言えば、その人を特徴づけるのは学歴くらいだ。 なるほど、「書類選考」の名のもとに、学歴でフィルタリングする企業が減らないわけだ、と思う。 そして、もう1つ
なぜ35歳を超えると頑張らなくなるのか。それはロールプレイングゲームの終盤と同じだから。
少し前に、知人がこんな記事を紹介していた。 なぜ35歳を超えると頑張らなくなるのか 20代のころ、自分のずっと上の先輩たちが35歳過ぎくらいにパフォーマンスが落ちていったのを不思議に思っていた。 そして、30歳を超えたとき、いままで一緒に頑張ってきた先輩達が35歳を超えたあたりで突然やる気をなくしていった。 いったい何が起こっているんだ？ 35歳にいったいなにがある？ 謎は解けないまま、私も37歳になっていた。 すっかり気力が無い。まったく仕事のモチベーションが沸かない。 自分がなってみて謎が解けた。 でも答えは教えな～い。 若手の時は、やる気のないオジサンを見て、自分はああはなるまい、と思っていたが、いざ自分がその立場になると、同じ陥穽にハマってしまう。 そんな話を聞く。 20代のときは 「そんなことって本当にあるの？」 と、誰もが思う。 ある。 むしろ特に若い頃に頑張って働いた人ほど、
VBScriptでWEBスクレイピング！ファイルシステムオブジェクトでテキストに書き出す | 隣IT
データをテキストファイルに書き出すスクリプト テキストエディタを開き下記のコードを入力します。全て入力し終わったら「テキストファイルに出力.vbs」などのファイル名でデスクトップに保存します。 Option Explicit 'テキストファイルに書き出す OutputText "テキストファイルに書き出すテストです" 'テキストファイルへ出力 Function OutputText(ByVal strMsg) Dim objFSO Dim objText 'ファイルシステムオブジェクト Set objFSO = WScript.CreateObject("Scripting.FileSystemObject") 'テキストファイルを開く Set objText = objFSO.OpenTextFile("C:\work\出力テスト.txt", 8, True) objText.write
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
ドキュメントプロパティでExcelブックを効率的に管理 [エクセル（Excel）の使い方] All About![ドキュメントプロパティでExcelブックを効率的に管理 [エクセル（Excel）の使い方] All About](https://cdn-ak-scissors.b.st-hatena.com/image/square/496fcbfa4269a6f040b9900cb13aa1543da4c978/height=288;version=1;width=512/https%3A%2F%2Fimgcp.aacdn.jp%2Fimg-a%2F1200%2F900%2Faa%2Fgm%2Farticle%2F3%2F9%2F1%2F8%2F7%2F9%2F201707181410%2Ftopimg_original.png)
TechCrunch | Startup and Technology News