My MSN

Click OK to add this content

 
Content Preview: rss
-+ホームページを作る(Excel)
589 days ago
ここに書き込むのは何年ぶりでしょう? なんとか細々と生きていました(w    さて、今回はブログっぽいホームページをExcelマクロで作成してみたのでご紹介します。  実物はここです ⇒ http://youkeyspace.com/   ・「ROOM」ごとにシートを用意(「あれこれROOM」「紅茶ROOM」「映画ROOM」の3シート)   ・各ROOM(シート)は表形式で入力(フィールドは「タイトル」「内容」「更新日」の3つででOK)   ・各ROOM(シート)ごとに1クリックでHTMLファイルを作成できるし、    全ページのHTMLファイルを1クリックで作成することもできる   ・cssは別途用意  HTMLがわかればとても簡単にできます。  cssは別に用意するので、デザイン(色、ヘッダー部画像など)の変更は簡単です。  各ページはマクロでテーブルを作成(<table>タグ)しているので、この形式の変更は 無理ですが、サイズはcssで変更可能です。   そのうち少しずつマクロをご紹介していけたらと思います。    追伸: [amazon.co.jp で買う]ボタンを表示させたくないのですが、方法がわかりませんでした。
-+マクロを複数のブックで共有する(Excel)
1143 days ago
久しぶりに覚書です。   あるExcelのマクロ(VBA)をつくったのですが、毎回新しいデータ(Excelのブック)が 送られてくるので、その都度マクロをコピー&ペーストしていました。 でもこれは非効率。そこで、ひとつのマクロを複数のブックで共有する方法を調べ ました。   ■方法  『 個人用マクロブック 』にマクロを保存します。  個人用マクロブックの名前は『 PERSONAL.XLS 』でした。    ■個人用マクロブックの作り方  [ツール]メニューの[マクロ]の[新しいマクロの記録]を選択して、表示したダイアログ  の「マクロの保存先」に『個人用マクロブック』を指定します。  その後[OK]ボタンをクリックしてマクロの記録を開始し、何もせずに記録を終了します。    注意:  [ツール]メニューの[マクロ]の[マクロ]を選択して表示する「マクロ」ダイアログでは  『個人用マクロブック』は指定できません。   ■個人用マクロブックにマクロを追加する  『個人用マクロブック』は最初は非表示になっているので、[ウインドウ]メニューの  [再表示]を選択して表示させます。  その後、[ツール]メニューの[マクロ]の[マクロ]を選択して編集します。      個人用マクロブックのシートに参照用の定数データを追加したのですが、 再び「表示しない」設定にしておかないと、Excelブックを開くたびに表示されて わずらわしかったです(苦笑) ちなみに、個人用マクロブックはこの↓フォルダにありました。 C:\Documents and Settings\xxx\Application Data\Microsoft\Excel\XLSTART スタート時に読み込まれるファイルはここに置けばいいのかな?
-+再びVBA
1301 days ago
ここ数ヶ月で身辺の状況が激変してしまいました。 これからはVBAを触る機会が増えそうです。 また面白いマクロを作ったらご紹介します。
-+Excelでカレンダ(VBA)
1389 days ago
多くの人は、仕事でスケジュールを書くときに何を使っているのでしょう? Microsoft Project とかかな? わたしはラフスケッチはExcelにカレンダを書いてやっているのですが、 カレンダを手入力するのは面倒。そこでカレンダを挿入するマクロを 作ってみました。   年月を指定して、どこかセルを選択してから[カレンダ挿入]ボタンを クリックすると、図のような1月分のカレンダを挿入します。 簡単なコード(VBA)でできます。うるう年などの難しい計算も必要 ありません。   <<2006.2.13追加>> お待たせしました。コードをご紹介します。 エラー処理とかしてないので、適当に追加してください。 コードが変でも怒らないでね。 年月を指定するところはリストにしてます。   ---------- Private Sub cmdButton_Click()     Dim strYear As String     Dim strMon As String     Dim week As Variant     week = Array("Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat")     Dim nFontColor As Integer     Dim nCnt As Integer     Dim cel As Range     Dim nline_cnt As Integer              '指定された年月     strYear = Cells(2, 2)     strMon = Cells(2, 4)         '1~3行目には出力できない     If 4 > ActiveCell.Row Then         MsgBox "1行目から3行目までには出力できません。" & vbCrLf & _                ...
-+この改行コードが…
1397 days ago
Webブラウザで表示している一覧のデータをCSV形式でファイルに 出力する機能があるのですが、どうもある一覧だけ先頭に改行コード が入ります。一体これは・・・?   【原因】  インクルードしているPHPのファイルの最終行に改行コードが  入っているのが原因のようです。次のような感じ。    ----------    ?>          ←ここに改行がある    [EOF]    ----------   【対処】  改行コードを削除しました。これだけで直りました。    ----------    ?>    [EOF]    ----------       【コメント】  結構繊細なものなのですね。
© 2009 MicrosoftMicrosoft