Excel VBA と MySQL
先週末からひさびさでExcel VBA をいじっています。 ひさびさなだけに色々と忘れているので、今後に備えて備忘録的に。 MySQL からレコードセットを取得して、Excelで使う MySQL にSQLを投げて、帰ってきたレコードセットをExcelシート上に展開します。 ADOとMySQLのODBC接続を使うので、以下の2項をお忘れなく。 VBEの参照設定でMicrosoft ActiveX Data Objects 2.x Library の参照 MySQLのODBCドライバダウンロードとインストール 'MySQL 接続 Dim con As New ADODB.Connection con.ConnectionString = "Driver={MySQL ODBC 3.51 Driver};" & _ "Server=hoge.piyo.com（データベースのあるサーバー）" &
Excelで仕様書はやめようよ | wrong, rogue and log
10年間にわたり、システムインテグレーション案件を40以上こなしているが、そのなかで特に気になるロバストな法則がある。それは、仕様書や要件定義書、はたまたスケジュール表をExcelで書いたり要求したりする個人・組織には必ず苦労させられるということだ。これは今までのところ9件中9件というように100%のヒット率である。 そもそもシステム仕様書を書くのになぜにExcelをつかう？Excelは文書を書くためのものじゃない。あくまで表計算ソフトである。Exceｌはセル単位でしか位置あわせができないので、レイアウトがかなり制限される。そしてページやパラグラフや書式の概念がないから、文書を構造化することなんで不可能である。更には印刷すれば当然のごとくずれるし、PDFにしても画面イメージと全く違う。 Microsoft製品をつかうなら仕様書はWordを使うほうが10倍楽だし、きちんとしたものができる。表
Excelのすべてのシートをテキスト出力するマクロ - 城陽人の本棚
Excelのすべてのシートをタブ区切りテキストでシートごとにファイル出力するマクロ。これは汎用性がありそうなのでここに貼っておこう。データに関係ない行は#を先頭につけておくとgnuplotがコメントと見なしてくれて幸せなかんじになります。 outdirに出力先のフォルダを指定、ファイル名はシート名+".dat"になってるので適当に変更して下さい。 Sub OutputTEXT() ' アクティブなワークブックのシートをすべてタブ区切りテキスト保存 Dim name As String Dim outdir As String Dim sheet As Worksheet outdir = "C:\work\tex\mthesis\graph\" '既にデータが存在する場合の上書き警告を非表示 Application.DisplayAlerts = False For Each sheet
仕事でExcel使うなら必ず読んでおきたい記事まとめ
サービス終了のお知らせ NAVERまとめは2020年9月30日をもちましてサービス終了いたしました。 約11年間、NAVERまとめをご利用・ご愛顧いただき誠にありがとうございました。
日経xwoman：doors 20代からのキャリアとライフ：日経xwoman：日経xwoman
2度の挫折越え、22歳で日本人女性初の南ア公認サファリガイドに NEW キャリア 2024.02.09
VBAで正規表現を使う
はじめに 改めて言うまでもないことですが、文字列処理で正規表現が使えると非常に便利です。VBAで正規表現を利用する方法を紹介したいと思います。 対象読者 VBAで正規表現を使用したい方 VBAで煩雑な文字列処理の行う必要のある方 なお、「正規表現についてよくわからない」という方は、以下のページの解説などを参考にしてください。 サルにもわかる正規表現入門 必要な環境 Windows VistaまたはWindows XP VBA開発環境 正規表現を使う前に VBAで文字列比較を行う場合、標準の機能としてStrComp関数やLike演算子があります。 特にLike演算子は、ワイルドカードなどによるパターンマッチングが行えます。正規表現よりも柔軟性は劣りますが、実現したい機能がLike演算子で済むのならば、無理に正規表現は使わずLike演算子を使った方がよいと思います。詳しくは、ヘルプにあるLik
VBAでの改行コード変換
セル内で改行するには、改行したい位置でAlt+Enterキーを押します。 このとき、入力される改行コードは0A(LF)です。Windowsで使われている一般的な改行コードは0D 0A(CRLF)です。 次のようなコードで確認してみました。 Sub Sample1() Dim buf As String, dmp As String, i As Long buf = Range("B2").Text For i = 1 To LenB(buf) dmp = dmp & Hex(AscB(MidB(buf, i, 1))) & " " Next i MsgBox dmp End Sub Excelは文字データをUnicodeで管理しています。入力したそれぞれの文字に該当する文字コードは次の通りです。 田 : 0x7530 中 : 0x4E2D 1 : 0x0031 2 : 0x0032 3 :
サービス終了のお知らせ - NAVER まとめ
サービス終了のお知らせ NAVERまとめは2020年9月30日をもちましてサービス終了いたしました。 約11年間、NAVERまとめをご利用・ご愛顧いただき誠にありがとうございました。
Office TANAKA - セルの操作[データの取得]
セルにどんなデータが入力されているかを調べるには、データの入力と同じようにRangeオブジェクトのValueプロパティを参照します。次のコードは、セルA2に入力されているデータを画面に表示します。 Sub Sample1() MsgBox Range("A2").Value End Sub もちろん、データを入力するときと同じようにValueプロパティを省略することもできます。では、データの入力と同じように、複数のセルに入力されているデータを同時に取得することもできるのでしょうか。もちろんできます。しかし、データの入力ほど簡単ではありません。次のコードは、セル範囲A2:A5に入力されているデータを配列bufに取り込みます。 Sub Sample2() Dim buf As Variant, n As Long buf = Range("A2:A5").Value n = InputBox(
Excel VBA 入門講座 If ～ ElseIf
条件により処理を分岐させたい場合は、If～ElseIfステートメントを使用します。Ifは、"If 条件式 Then"の形式で条件を調べて、条件式に合致（式を評価した結果がtrueであるとき）だけその次のステートメントを実行します。条件がtrueでないときは、次の次の条件式の条件を調べます。 If 条件式1 Then 条件式1を満たした場合の処理 ElseIf 条件式2 Then 条件式2を満たした場合の処理 Else 条件式1と条件式2を満たさなかった場合の処理 End If
Excelで、セル内の任意改行を一括して削除したい(or他の文字に置き換えたい） | パソらぼ
Excelの便利技シリーズです。 仕事が忙しくて残業続きでなかなか記事を書く時間がとれなくて、予告をしておきながらこの話を書き上げるのに2ヶ月もかかってしまいました * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 今日のテーマは「セル内の任意改行を一括して削除する方法について」です。 [例文] このように、セルの行の高さを広げて、文字列をたくさん入力するということがあると思います。 セル内で、任意の場所で改行するには、キーボードから「Alt」+「Enter」キーを押します。 すると自動的にセルの書式が「セル内で折り返して表示」となり、1セル内で複数行、文字を入力できるようになります。もちろん、あらかじめセルの書式を「セル内で折り返して表示」と設定しておいても大丈夫です。 ◆ ◆ ◆
Webページの表をソート／フィルタリング可能にする「TableTools」拡張 | OSDN Magazine
Webページに公開されている表形式の資料を利用したいと思って、Excelにコピーしようと思ってもうまくいかない――そういう経験をした人はいないだろうか。公開資料としてExcelファイルそのものがアップロードされていることもあるが、やはりテーブルタグを使って表示されているものも多い。しかし、テーブルタグで表示された表を、そのまま選択してコピーしても、狙い通りの形にならず悩んでしまう。そんなテーブルタグを使って作成された表を、HTMLソースを書き換えることなく、まるでExcelの表のように操作してしまおうというのが、「 TableTools 」というFirefoxアドオンだ。 もちろん、Excelのすべての機能が使えるというわけではないが、任意の列を元にして表全体を昇順・降順でソートしたり、オートフィルタのような絞り込みも可能。また、表の内容をタブ区切りのテキストとしてクリップボードへコピーす
5秒でできる、知っていると便利なエクセルの15のテクニック
Chandoo.orgのエントリーから、5秒で短時間に実践できる、知っていると便利なエクセルの15のテクニックを紹介します。 Excel can be Exciting - 15 fun things you can do with your spreadsheet in less than 5 seconds ※5秒は無理、というのもありました。 コメントの色・図形の変更
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
ページのタイトル
Office TANAKA - Excel VBA Tips[正規表現によるマッチング]