初心者のためのOffice講座ーはまちゃんらんど

Wordは、以前のバージョンからですが、「段落」ダイアログボックスの「タブ設定」ボタンをクリックすると、「タブとリーダー」の設定ができます。（画像はWord2010です）
Word2003の「書式」メニューには「タブとリーダー」となっていますが。

ダイアログボックス名は、「タブとリーダー」になっています。


PowerPoint2007、2010では、「段落」グループのダイアログボックスの起動ツールから、「段落」ダイアログボックスのを起動させ、「タブとリーダー」ボタンをクリックしても、「リーダー」の設定はできません。

ダイアログボックス名は「タブ」になってます。


ボタン名にないことができるのは嬉しいけど、ボタン名にあって、できないのは・・悲しい。
Word2013、PowerPoinr2013も同じです。
WordとPowerPointのボタン名を間違ってるとか？

ワークシートでセルA2のように一つのセル内に氏名と読みがながあって、読みは（）内に表記されています。
この名前をセルB2に漢字、セルC2に読みというように分けて表示する方法です。


セルB2には、「=LEFT(A2,FIND("（",A2)-1)」と入力します。


セルC2には、「=MID(A2,FIND("（",A2,1)+1,FIND("）",A2,1)-FIND("（",A2,1)-1)」と入力します。


LEFT関数、MID関数、FIND関数ってよく使いますね。
でも、すらすら～とはできません。

ワークシートで文字列内の空白スペースを削除するには、置換機能を使って操作することもできますが、
今回は、VBAで削除したいなと。

途中まではできたけど・・結局　検索しました。(^^ゞ

セルA1を選択してアクティブセル領域の全角スペース、半角スペースともに削除します。

Worksheets("シート名").Range("A1").CurrentRegion.Replace What:=" ", Replacement:="", Matchbyte:=False

iPhoneの契約が切れるのを機に2月にiPhone4Sを購入しました。
本当は、iPhoneのままでも良かったのだけど、通信費を安くするプランには新規購入しないとできないとのことだったので、仕方なく・・でもsiriちゃんとは遊びたかったから、やっぱりiPhone4Sにはしたかった。

でも、iPhone4Sの在庫があるショップは少ない。3件目にしてやっとGET。

ショップで「モバイルルータを持ち歩くから、wi-fiしか使わないようにして通信費を節約したい」と申し出たら、ささっと、お勧めプランを設定してくれました。

料金プランは　「ホワイトプラン」
割引サービスを　「パケットし放題forスマートフォン」にして、
設定画面から「モバイルデータ通信」をオフに。

「機内モード」をオンにすると、電話も繋がらなくなるから気をつけてくださいねぇーって言われました。

この設定にすると、電話番号からメッセージを送れるSMSは使用可
softbank.ne.jpのメールアドレスは3G回線なので使用できない。
だけど、i.softbank.jpのメールアドレスはwi-fiで使用可。
もちろん、Gメールなどは設定だけすれば、wi-fiで使用可。

今も家族無料キャンペーンって、やってるのかなぁ～
これまで使っていたiPhoneを2年間無料で使用できるとのこと。
そうなの？ってことで、新しい電話番号になった旧iPhoneも持ってます。

iPhone4Sのオプションも一か月後には全て解約して、4月の請求金額は1,422円でした。(^^)v
4月は基本料が割引されているので、その分安いです。
3月は機種変更手数料(2,000円)とパケット料金が発生してるみたいで少し高くなってます。
「モバイルデータ通信」をオフにしても、パケットが発生している場合は自動通信のチェックもしたほうがいいですね。
電話はほとんどLINEを使ってますし、不便なことはないです。


時々、モバイルルータの電池切れがありましたが、昨日、モバイルルータも新規(URoad-Aero)購入したので、これも解消できそうです。自宅でも、このルーター一台だけです。PC4台、スマートフォン2台、アップルTV、タブレット、プリンター、全部OKです。月々、3,880円で、プロバイダ契約も不要です。このルーター、超薄くて可愛い～(^.^)


そそ、iPhone4Sからルーターの設定ができます。便利になったもんだ♪

サブフォームのソースオブジェクトを変更するには、イベントの更新後処理に↓のように記述します。

Me.サブフォーム名.SourceObject = "テーブル.テーブル名"
Me.サブフォーム名.SourceObject = "クエリ.クエリ名"

Access2010で解説してみました。
サブフォームのソースオブジェクトの変更