2014年03月26日

ワードのオートシェイプの図形が編集できない

以前に作ったオートシェイプの図形が編集できなくなった場合
Wood 2003の場合
表示⇒ツールバー⇒図形表示をクリック
下側にツールバーが表示され、白抜き矢印をクリツクすると移動できるようになる

posted by ガンさん | Comment(0) | Word / Excel |

2013年04月15日

エクセルVBAのオーバーフロー

エクセルのマクロで入力フォームを作っていますが、32767行までは動くのですが32768行からオーバーフローしてしまいます
調べたら、変数の宣言を Integer にしていて、Integer型は扱える数字の範囲が32,767 までだったので Long型に変えたら動きました
Long型は2,147,483,647まで扱えるけど、メモリ消費が多くなるようです
posted by ガンさん | Comment(0) | Word / Excel |

2013年04月04日

Excelで複数のワークシートの平均値を出す

エクセルで、複数のワークシートまたは、複数のブックの同じセル番地の平均値や合計を出す方法

@データ⇒統合をクリックしていくと下図のダイヤログが出てきます
tougou.gif
A集計の方法を選択
B統合元範囲を選択して追加をクリック
C同じ様に統合元範囲を選択して追加を繰り返し、OKをクリック

posted by ガンさん | Comment(0) | Word / Excel |

2013年03月15日

入力した文字数を調べる

よく 「何文字以内で書きなさい」 というのがありますが、これを一々数えるのも大変ですが、Word では簡単に文字数を調べられます
@ 調べたい文章をドラックして反転させておく
A メニューバーの、ツール⇒文字カウントを見れば表示されてます

エクセルの場合は、関数を使うので少し難しい
=LEN(文字列) 全角と半角の区別なく、1文字を1として返します
=LENB(文字列) 全角は1文字を2、半角は1文字を1として返します
posted by ガンさん | Comment(0) | Word / Excel |

2013年02月20日

郵便番号で住所を自動入力

エクセルの郵便番号変換ウィザードを使えば郵便番号⇔住所が一括変換できるが、電話やFAX注文のデータを1件づつ入力する際には使い物にならない
そこで、VBAのユーザーフォームのテキスト入力欄に自動的に表示できないかと調べてみましたら、詳しく解説されたページがありました
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_130_050.html

まず、こちらのページから Excel サンプルと、郵便局のホームページから郵便番号データ全国一括版をダウンロード
サンプルを開き、郵便番号データファイルの取り込みをクリックすると自動的に郵便番号住所変換データベース (KEN_ALL.mdb) が生成される
試しに、郵便番号⇒住所変換サンプルをクリックしてテストしてみると正常に動くのがわかる

20233.jpg
このサンプルのモジュールを自分が使っているフォームにコピーして実行させると何故かコンパイルエラーとなる ちっ(怒った顔)
当然、TXT_ZIPCODE と TXT_JUSYO の部分は書き換えているのだが?
基礎から勉強してない私には手におえないと思っていたら、マクロ⇒visual basic editor⇒ツール⇒参照設定をクリックし、参照可能なライブラリ ファイルの中から「Microsoft ActiveX Data Objects 2.7 library」と「Microsoft ADO Ext. 2.7 for DDL and Security」にチェックを入れてやると動きました わーい(嬉しい顔)

なお、先に住所を地番等まで入力し、後から郵便番号を入れると折角入力した地番等が消えてしまうので、住所欄にデータがあれば動かないようにしました
If 住所.Text <> "" Then Exit Sub

逆に、住所を入れれば郵便番号が自動的に表示されるようしたいと思っても、私には到底無理なので、住所欄に住所を入力してボタンをクリックするとグーグルで郵便番号を検索した結果が出るようにしておきました
Private Sub CommandButton_Click()
Dim 番号検索 As String
番号検索 = "http://www.google.co.jp/search?sjif&q=" + 住所.Value + "%20郵便番号"
ThisWorkbook.FollowHyperlink address:=番号検索
End Sub
posted by ガンさん | Comment(0) | Word / Excel |
1 2 次へ>>