BASE関数で10進数表記をn進数表記に変換する
羽山 博（はやま ひろし） 京都大学文学部哲学科（心理学専攻）卒業後、NECでユーザー教育や社内SE教育を担当したのち、ライターとして独立。 ソフトウェアの基本からプログラミング、認知科学、統計学まで幅広く執筆。読者の側に立った分かりやすい表現を心がけている。 2006年に東京大学大学院学際情報学府博士課程を単位取得後退学。現在、有限会社ローグ・インターナショナル代表取締役、日本大学、青山学院大学、お茶の水女子大学講師。 吉川明広（よしかわ あきひろ） 芝浦工業大学工学部電子工学科卒業後、特許事務所勤務を経て株式会社アスキーに入社。パソコン関連記事の執筆・編集に従事したのち、フリーランスの翻訳編集者として独立。 コンピューターとネットワーク分野を対象に、書籍や雑誌の執筆・翻訳・編集を手がけている。どんな難解な技術も中学3年生が理解できる言葉で表現することが目標。 2000年〜2003年、国
Range.NumberFormat プロパティ (Excel)
オブジェクトの表示形式を表すバリアント型 (Variant) の値を取得または設定します。 構文 expression.NumberFormat expression は Range オブジェクトを表す変数です。 注釈 指定されたすべてのセル範囲の表示形式が同じでない場合、Null を返します。 表示形式を示す文字列は、[ セルの書式設定] ダイアログ ボックスの [ 表示形式] の文字列と同じです。 この文字列は、NumberFormat プロパティと NumberFormatLocal プロパティで使われますが、Format 関数で使う表示形式とは異なります。 詳細については、 表示形式の書式記号 (Microsoft サポート) を参照してください。 例 次の使用例は、シート 1 のセル A17、行 1、および列 C にそれぞれ表示形式を設定します。 Worksheets("Shee
Workbook.Close メソッド (Excel)
ブックを次の受信者に回覧する必要がない場合 (回覧用紙がないか、既に回覧されている場合)、この引数は無視されます。 それ以外の場合、このパラメーターの値に応じてブックが回覧されます。 True を指定すると、次の受信者にブックが送信されます。 False を指定すると、ブックは送信されません。 この引数を省略すると、ブックを送信するかどうかを確認するダイアログ ボックスがユーザーに表示されます。 注釈 Visual Basic からブックを閉じるとき、ブックの Auto_Close マクロは実行されません。 RunAutoMacros メソッドを使用して、Auto_Close マクロを実行します。 例 次の使用例は、Book1.xls を閉じます。内容の変更は保存しません。 Workbooks("BOOK1.XLS").Close SaveChanges:=False サポートとフィードバ
Visual Basic for Applications (VBA) の言語リファレンス
Office Visual Basic for Applications (VBA) 言語リファレンスへようこそ。 このリファレンスには、VBA に基づくソリューションを開発するときに役立つ概要情報、プログラミング タスク、サンプル、および参考情報が含まれています。 次のセクションのトピックを表示するには、左側のナビゲーションにある目次をご使用ください。 Visual Basic の概念に関するトピック Visual Basic プログラミングを理解するのに役立つ情報が記載されています。 Microsoft Forms の概念に関するトピック UserForms とコントロールについて、および、Visual Basic を使用してそれらをプログラミングする方法について説明します。 Visual Basic の操作手順のトピック 役に立つ一般的な操作手順 (オブジェクト ブラウザーの使用方法
Office TANAKA - Excel VBA関数[IsNumeric]
構文 IsNumeric(expression) 引数expresionには、数式または文字列式を含むバリアント型の式を指定します。 解説 引数expresionが、数値として認識できる場合はTrueを返します。それ以外はFalseを返します。 IsNumeric関数は、引数expresionが日付式の場合はFalseを返します。 サンプル 次の例は、ユーザーが入力した値が数値かどうか判定します。 Sub Sample() Dim a As Variant a = InputBox("数値または文字を入力してください") If IsNumeric(a) Then MsgBox a & "は数値です" Else MsgBox a & "は文字です" End If End Sub
いつのまにかExcelでswitch文が使えるようになってた - Qiita
前提 いつのまにかExcelでswitch文が使えるようになってた。 詳しくはOfficeサポート見てください！ https://support.office.com/ja-jp/article/switch-%E9%96%A2%E6%95%B0-47ab33c0-28ce-4530-8a45-d532ec4aa25e いつから使える？ Excel 2016（for Mac）以降 常に最新版を使わされるような下記のExcelはもちろん使えるようです。 for Office 365（for Mac）、for iPhone、for Android、etc. 書式 式の結果＝値1 の場合、結果1を返却 [式の結果＝値2 の場合、結果2を返却（以降、値127,結果127まで）] [式の結果が上記に含まれない場合、既定を返却] 例 =SWITCH(A1,1,"壱",2,"弐",3,"参",4,"四"
Office TANAKA - Excel VBA Tips[複数選択可能なリストボックス]
リストボックスで複数の項目を選択可能にするには、リストボックスのMultiSelectプロパティを設定します。標準では「fmMultiSelectSingle」が設定されています。 fmMultiSelectSingle fmMultiSelectMulti fmMultiSelectExtended 標準のfmMultiSelectSingleは、単一選択です。fmMultiSelectMultiまたはfmMultiSelectExtendedを設定すると、複数の項目を選択可能になります。両者は複数の項目を選択する方法が異なります。 【fmMultiSelectMulti】 項目をクリックすると選択できます 別の項目を選択するときもクリックだけです CtrlキーやShiftキーは必要ありません すでに選択している項目を再度クリックすると 選択状態が解除されます 【fmMultiSelec
![Office TANAKA - Excel VBA Tips[複数選択可能なリストボックス]](https://cdn-ak-scissors.b.st-hatena.com/image/square/4e7ceb4da166b7fcb942edcca8605544f749d5af/height=288;version=1;width=512/http%3A%2F%2Fofficetanaka.net%2Fexcel%2Fvba%2Ftips%2F144-01.png)
Office TANAKA - Excel VBA Tips[入力されているデータの最終セルを取得する]
これは基本的なテクニックだと思って今まで解説しませんでしたが、セミナーなどで質問が多かったので、簡単に書いておきます。たとえば、下図のようなリストがあったとします。 この、現在入力されている最終セル(あるいは最終行)を取得するには、どうしたらいいでしょう。 Excelに詳しくない、VBAのプログラミング的なことしか知らないような方でしたら、次のように考えるかもしれませんね。「A列を上から順番に見ていって、空欄セルが見つかったら、その直前が最終セル」だと。その方法でやってみましょうか。 Sub Sample1() Dim i As Long, r As Long For i = 1 To 10000 Range("A" & i).Select If Selection = "" Then r = i - 1 Exit For End If Next i Range("A" & r).Sele
Office TANAKA - VBA高速化テクニック[個別に呼ばない]
昔、本項で比較したかったのは、要するに「For Next と For Each って、どっちが速いの？」ってことです。1995年にMicrosoftから出版されたVBAに関する公式本に「For Each の方が速いよ～理由はね～」って書いてあったからです。その頃調べた結果では、確かに For Each の方が速かったです。でも、時代は変わりました。と同時に、パソコンの性能も飛躍的に向上しています。理論的に速くても、体感速度として、あるいは計測結果としては、どうなんでしょう。 まず、For Next と For Each で比較してみましょう。 Sub Test1() Dim i As Long For i = 1 To 10000 Cells(i, 1) = 100 Next i End Sub Sub Test2() Dim c As Range For Each c In Range(
Office TANAKA - Excel VBA Tips[Excel 2007のSortオブジェクト]
Add2メソッドについて(2019年1月 追記) 2018年10月18日にExcel 2016は機能拡張されて、バージョン1810(ビルド 11001.20074)になりました。このとき実装された機能拡張のひとつに、"新しいデータ型"があります。追加されたのは「株式型」と「地理型」です。両者の型に関しては、下記Microsoftのページをご覧ください。 Excel データ型: 株価と地理 この「株式型」と「地理型」の追加に伴って、セルの並べ替えで条件を指定するSortFieldsコレクションに、新しくAdd2メソッドが追加されました。ちなみに、いままではAddメソッドでした。両者の働きに大きな違いはありませんが、Add2メソッドは、新しい「株式型」と「地理型」のサブフィールドを並べ替えることが可能です。Add2メソッドをヘルプで調べると、次のように記載されています。 この API には、地
Office TANAKA - Excel VBA関数[VarType]
引数varnameにユーザー定義型を指定することはできません。 サンプル 次の例は、バリアント型変数の内部処理形式を表示します。 Sub Sample() Dim var As Variant var = "ABC" MsgBox VarType(var) '８を表示します var = 123 MsgBox VarType(var) '２を表示します var = 123.456 MsgBox VarType(var) '５を表示します var = Array("A", "B", "C") MsgBox VarType(var) '8204を表示します End Sub
Office TANAKA - Excel VBA Tips[メニューバーに独自のメニューを追加する]
VBA でシステムを作ったとき、機能をメニューから選択できると便利ですね。独自のメニューをメニューバーに登録する方法をご紹介しましょう。 Sub AddMenu() Dim NewM As Variant, NewC As Variant ''新しいメニューを追加する Set NewM = Application.CommandBars("Worksheet Menu Bar").Controls.Add(Type:=msoControlPopup) NewM.Caption = "新しいメニュー(&C)" ''オリジナルコマンドを追加する(1) Set NewC = NewM.Controls.Add With NewC .Caption = "保護解除(&U)" .OnAction = "UnProtectSheet" .BeginGroup = False .FaceId = 277
Office TANAKA - Excel VBA関数[MsgBox]
MsgBoxで、どんなときに括弧を使うのかと、メッセージを改行する"改行コード"について、詳しい解説を動画で公開しています。ぜひ、こちらもご覧ください。Youtubeでは、ほかにもたくさんの動画を公開しています。チャンネル登録をお忘れなく！ Office TANAKAチャンネル ■VBAのコードで、括弧はどんなときに使うのか 構文 引数promptは必ず指定します、ダイアログボックスに表示するメッセージを指定します。 引数buttonは省略可能です。ダイアログボックスに表示する、ボタンの種類やタイプなどを指定します。 引数titleは省略可能です。ダイアログボックスのタイトルバーに表示する文字列を指定します。 引数helpfileは省略可能です。ダイアログボックスの[ヘルプ]ボタンから開くヘルプファイルを指定します。引数helpfileを指定する場合は、引数contextも必ず指定しなけれ
Office TANAKA - 変数の使い方[部屋数を変えられる動的配列]
配列は、いわば集合住宅のようなものです。1棟の建物に複数の世帯が同時に住むことが可能です。配列を使用するときは、配列の宣言時に部屋数(要素数)を指定します。 では、プログラムの実行中に、要素が増加するような場合はどうでしょう。あるいは、プログラムを作成する時点では、いくつの要素を格納するかわからないときは、どうしたらいいでしょう。そんなケースで役立つのが動的配列という使い方です。 動的配列は、宣言時に要素数を指定しません。 Sub Sample33() Dim Member() As String End Sub 一般的な配列では「Member(5)」などと要素数を指定するところを、「Member()」と括弧だけを指定します。これで、変数Memeberは配列として使用できます。ただし、この宣言時点では要素数が確定していませんので、実際には使えません。そこで、プログラムのコード中で要素数を再
Office アプリケーションのオートメーションでエラー 429 が発生する
概要 Microsoft Visual Basic で New 演算子または CreateObject 関数を使用して Microsoft Office アプリケーションのインスタンスを作成すると、次のエラー メッセージが表示されることがあります。 このエラーは、コンポーネント オブジェクト モデル (COM) が要求された Automation オブジェクトを作成できず、Automation オブジェクトが Visual Basic では使用できない場合に発生します。 このエラーは、すべてのコンピューターで発生するわけではありません。 この記事では、このエラーの原因となる可能性がある一般的な問題を診断して解決する方法について説明します。 詳細情報 Visual Basic では、エラー 429 の原因がいくつかあります。 エラーは、次のいずれかの条件に該当する場合に発生します。 アプリケ
Office TANAKA - Excel VBA Tips[.NET Frameworkを使う]
私は勘違いをしていました。いえ、確かな根拠を調べずに「できないに違いない」と思いこんでいたのかもしれません。 今までずっと、VBAから.NET Frameworkを使うことはできないと思っていたのですが、実はできたんですね。知りませんでした。 たとえば、.NET Frameworkには「System.Collections名前空間のArrayListクラス」というクラスがあります。 ArrayListクラスに関する詳細は、MSDNの下記ページをご覧ください。 ■ArrayList クラス (System.Collections) このArrayListクラスを使って、配列を操作してみましょう。次のコードは、.NET FrameworkのArrayListクラスを利用して、ランダムな数値を配列に格納します。さらに、配列のソートや複製の作成、配列の逆順などを行います。 Sub Sample1(
VBAで独自の.NETライブラリを使うには？［VB］ - ＠IT
Microsoft Office製品（WordやExcelなど）に独自の処理を追加する方法としては、主に下記の3種類がある。 VBA（Visual Basic for Applications）マクロ Office COM（Component Object Model）アドイン Visual Studio Tools for Office（VSTO） このうち、最も手軽に作成できるのが、VBAマクロであるが、このVBAマクロでも、.NET Frameworkで作成した独自のクラスを活用できる。本稿ではその方法を紹介する。 ●VBA向けの.NETライブラリの作成 最初に、VBA向けに.NETのクラス・ライブラリを作成しよう。 管理者としてVisual StudioのIDEを立ち上げ、メニューバーから［ファイル］－［新規作成］－［プロジェクト］を実行すると表示される［新しいプロジェクト］ダイア
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Microsoft、「Excel」に14の新関数を追加へ ～テキスト・配列操作が簡単に／「Office Insider Program」でテストされたのち、製品版へ展開
「Microsoft Office」が「ODF 1.3」対応へ ～「LibreOffice」でも扱えるオープンなファイル形式／次期永続版「Office 2021」でもサポート
File オブジェクト