ExcelVBAでサイトにアクセス、XMLを受け取ったら、セルに書き出したい！

ってことを、きっとこのブログに書いているはずだけど、
自分でも見つけられない・・・

ということで、書き直します。

【お題】
gooのいまトピのRSS

http://ima.goo.ne.jp/rank.rss

にアクセスして、

な風に表示したい

【VBA　ソースコード】

Sub main()
    On Error GoTo err
    Dim httpObj
    Dim sendData
    
                '   データセット
    target_url = "http://ima.goo.ne.jp/rank.rss"
    sendData = "username=admin&password=pass"
    
                '   POSTで飛ばします
    Set httpObj = CreateObject("Microsoft.XMLHTTP")
    httpObj.Open "POST", target_url, False
    Call httpObj.setRequestHeader("Content-Type", "application/x-www-form-urlencoded")
    httpObj.send (sendData)
    
                '   結果表示
    Set xdoc = httpObj.ResponseXML
    
    'itemを取り出し（複数ある）
    Set itemNodeList = xdoc.getElementsByTagName("item")
    For i = 0 To itemNodeList.Length - 1
    
        '   1アイテムごとに
        Set rec = itemNodeList.Item(i)
        
        '   レコード書き出し
        Cells(i + 2, 1) = i + 1
        Cells(i + 2, 2) = rec.getElementsByTagName("title").Item(0).Text
        Cells(i + 2, 3) = rec.getElementsByTagName("description").Item(0).Text
        Cells(i + 2, 4) = rec.getElementsByTagName("link").Item(0).Text
        Cells(i + 2, 5) = rec.getElementsByTagName("pubDate").Item(0).Text
    Next

    Exit Sub
err:
    MsgBox "error"
End Sub

チェックマーク☑って、文字、あるんだ（＠＿＠）！

今、Excel方眼紙埋めてて気づいた。

チェックしてくださいという欄があって、サンプルに

☑ 新規

と書いてあったので、初めて知った。

チェックを示す文字☑って、あるんだ・・・・

動画作成PowerPoint用無料アドインOffice Mix公開プレビュー開始

ICTのある学び　動画作成アドイン Office Mix
http://ict.edufolder.jp/archives/717

によると、(以下太字は上記サイトより引用）

米国時間5月6日にマイクロソフトは「Meet Office Mix」というブログ投稿で，PowerPoint用の無料アドインソフト「Office Mix」の公開プレビューを開始すると発表しました。

　このOffice Mix，名前からは想像しにくいですが，動画作成アドインです。PowerPointスライドをベースにした説明動画を作成できるのです。


とのこと。おおお～興味津々。

ちなみにそのMeet Office Mixのブログは

Meet Office Mix
http://blogs.office.com/2014/05/06/meet-office-mix/

PowerPointで数式を書くとき

みなさん、どうしてますか？というのを、授業でやってた・・・

■数式エディタ

PowerPointの
「挿入」→「オブジェクト」
出てきたダイアログで
「Microsoft　数式　3.0」
を選択
「Microsoft 数式エディタ」で書いてます。

■MathTypeとか・・・

そのときは、知らなかったんだけど、ここのことかしら・・・

MathType 6.8
http://mathtype.soft32.com/


■たしか、むかしPowerPointでTex形式で数式入れられると聞いた気が・・・
これかな・・・

pptTeX
http://d.hatena.ne.jp/naitaku/20130608/1370659470


今、時間ないので、今度、時間があるとき確かめようと・・・

Office.comって、フル機能ではない？

無料でMicrosoftのOfficeソフトが使える

Office.com
http://office.com

だけど、つかってて、遅いというのは、無料だからしかたないとして
置いておいて、そもそも、これって、フル機能ではない？

今、word onlineを使っていて、図形を入れようと思ったら・・・



うん？図形がない？？
何か設定するのかなあ？そうすると、出てくるのかなあ？
それとも、もともとフル機能ではなく、図形がないのかなあ・・・

・・・手持ちのWordでやろう・・・
（じゃ、はじめから、そうしろよ！というツッコミがありそうな気が・・・）

無料でOfficeが使える(Linuxからも）「Office Online」をはじめてみた！

前に、

Microsoft、ブラウザ版無料Officeの「Office Online」を発表
http://blog.goo.ne.jp/xmldtp/e/0755335748b93eb7bc147cd4413af6e5

っていうエントリを書いた。

そこにある、ブラウザ版無料Officeの「Office Online」をやってみたので、メモメモ

---

まず、そのサイトにいく

https://office.com/


リダイレクトされて、結果、こんな画面になるはず

wordを使いたかったので、wordをクリックした
（アカウントを持っていない場合は、右上の「アカウント」をクリックすると、
　以下の画面の次の画面に行く）


Microsoftアカウントを持っているので、そっちをクリック


アカウント名、パスワードを入れて「サインイン」
なお、アカウントを持っていない場合、初期画面で「アカウント」を
クリックすると、この画面に来る。その場合は、「新規登録」をクリック

「空白の文書を新規作成」してみた・・

なかんじで書いてみた。

保存は

自動的にしてくれる。ローカルにも保存できる。


Linuxのブラウザから開いてみた

Linuxでもできる。

急に「かな漢」が、まったく漢字変換しなくなった！！（Windows7で）

こんなかんじ

変換しない・・・
え、どうしたの・・・（＞＿＜！）
「辞書／学習」をみたら・・・

辞書がな～い（＠＿＠！）
IME辞書が消えた・・・。
にあるように、（丸で囲んだ）「修復」をとりあえずやってみて、再起動したけど・・・
だめ、変換しない・・・

え～・・・なにした？このまえまでちゃんと動いてたぞ・・・
そのあとやったことは・・・

　　　　ああああああ！！わかったああああ！

新人（といっても、もうほぼ１年たつが）に、
Officeいれてもらったんだった・・・
ってことは、かな漢が、OfficeIMEになっていて、
それが、おかしくなってるのかあ・・・

MS-IMEに戻しましょう！

ここ

既定の日本語入力システムを Office IME から Microsoft IME に切り替える方法
http://support.microsoft.com/kb/932104/JA

つまり、IMEの設定

から

全般タブ、「追加」というボタンをクリックすると、右側の画面が出るので、
MS-IMEにチェックをいれて

丸で囲んだところを、MS-IMEにして適用・OKしたら再起動
・・・すると

うん！ちゃんと変換できる・・・

めでたしめでたし（＾＾）ｖ

あらゆる組織に効くクラウド-Office365

cloud days tokyo 2014に行ってきて

あらゆる組織に効くクラウド-Office365
～ゲストに大林組様をお迎えして

という話を聞いてきた。その内容をメモメモ

---

video
働き方があなたを変える
日本マイクロソフトのワークスタイル

在宅勤務の例
Office３６５が提供する価値
・クラウドオールインワンパッケージ
　　Officeデスクトップアプリケーション
　　　(Office365 ProPlus)
　　OfficeWebアプリケーション
　　　(Office online)

Office365のビジネス状況
さまざまなパートナーとの協業により急速にビジネスを拡大
・ビジネスの実績
・付加価値を増大するパーソナルソリューション
・競合優位性


■ビジネスの実績
　　全導入企業の９０％が中小企業
　　日経２２５銘柄企業の６０％がすでに導入
　　１３０を超える顧客導入事例を公開
　→丸紅、カルソニックカンセイ、大林組、JAL

大林組　Office365導入事例
　会社概要：ゼネコンの１社、本社はマイクロソフトと５０ｍくらい
・建設現場の生産性向上
　　旺盛な建設需要
　　現場の生産性向上が不可欠
　　現場のICT化→第三のプラットフォームの活用
　　　　　クラウド
　　　　　ビッグデータ
　　　　　モバイル
　　　　　ソーシャル

・タブレットの活用
　　タブレット端末３０００台を現場に導入
　　　それまで：図面を抱えていた
　　　　　→技術資料を入れる
　　　検査システムを開発

・メールシステムの更新
　　更新に向けた課題
　　　メール増えた、保守切れた、
　　　スマホ、タブレット対応
　　　グローバルで統一した
　　　ウィルス／スパム対策

　　建設業におけるICT環境の特徴
　　　数百の工事事務所、仮設事務j所
　　　CADの共有（１G)
　　　多くの関係者との情報共有：メール主体

・スケジュール

Office365選定理由
・RFP：クラウドかオンプレミスかを問わず６社

・選定ポイント
　　５０Gのメール、遠隔２箇所え運用
　　ActiveSyncスマートデバイスへのtが言おう
　　国内外グループ会社へ展開容易
　　ウィルススパム対策
　　他者にないポイント
　　　　アーカイブ機能
　　　　新しい業務スタイル

・不安だったこと
　　ネットワーク負荷
　　サービス継続性
　→大きなトラブルなくOK

更なるメリット
・災害時にも利用できる
　　従業員の安全確保＋復旧しえん→メール利用、いつでも
・Office365の統合的な活用

------------

メールからが「きっかけ」
こういうお客さんが増えている

■付加価値を増大するパートナーソリューション
業務システムと連携
アプリで

　Video
　OBC（奉行シリーズ）

■競合優位性
　価格
　製品
　プライバシー保護

・持続的に機能向上するOffice365
　　PowerBI
　　Officeアプリ
　　Yammer

Demo
・PowerBI：PowerQuery、Powerピボット（モデリング）、PowerView
・yammer

「営業力強化」を実現するモバイルワークスタイル

cloud days tokyo 2014に行ってきて

中堅・中小企業に効くクラウド - Office 365
「営業力強化」を実現するモバイルワークスタイル

という話を聞いてきた。その内容をメモメモ

---

営業力強化に必要なこと
・量

・時間を減らす
　　→ういた時間をお客様の接点

・提案品質
　社内の知見の共有

どこにカイゼンの余地があるか～直面する課題～
・会社に戻らないと・・
・集約する：文書管理
・トレーニング・会議：日程調整
　　状況が分からない

Office３６５とスマートデバイス
１．しぇあぽいんとおんらいん
　　→ファイルアクセスできる
２．Lync
　　→コミュニケーション
３．ExchangeOnline

Demo
１．いつでもどこでもどんなでばいすでも
　　OneNote

２．臨場感あふれるコミュニケーション
　　Lync

３．メールチェック、チーム、日程管理
　　Outlook

事例：大堀商会様

まとめ：Office３６５で実現するモバイルネットワーク
必要な人や情報に、いつでもどこでもどんなデバイスからでもアクセスできるプラットフォーム

米Microsoft、ブラウザ版無料Officeの「Office Online」を発表

米Microsoftは20日、Webブラウザーから無料でOfficeの主要機能を利用できる「Office Online」を新ドメイン「Office.com」サイトで公開した。Microsoftアカウントがあれば誰でも無料で利用できる。

だそうです

米Microsoft、ブラウザ版無料Officeの「Office Online」を発表
http://internet.watch.impress.co.jp/docs/news/20140221_636298.html

より（太字は上記サイトより引用）

※Microsoftアカウント＝旧 Windows Live ID

Excel活用テクニック～知っ得・まとめ～

あとで見る。

特大ボリュームで送る便利技まとめ　Excel活用テクニック～知っ得・まとめ～
http://itlifehack.jp/archives/8258111.html

Office365って、どうなんだろう・・・？

WindowsXPの移行と同時に、Officeの移行の話もありますよね。
Office2003がサポート切れになるという・・・

そこで、Officeどうするっていう話が話題になるんだけど、
Office365って、どうなんでしょうねえ・・

宣伝文句だと小規模向けの
Office 365 Small Business Premiumは、年間 12,360 円
ってことらしいけど・・・

http://www.microsoft.com/ja-jp/office/365/product-p.aspx

とってもよさげに聞こえるけど。。。
なんか、死角があるとか・・・ないかなあ（＾＾；）

セミナーとか、行ってきたほうがいいかなあ・・・？

Wordファイル内の画像の解像度を、いっぺんに落としたい（案）

まだ、やっていないので、アイデア（案）段階。

【問題】
Wordに、相当な画像を貼りこんで、とても大きくなってしまった。
すべての画像の解像度を、出来るだけ簡単に落としたい

【ソリューション案】
・docx形式で保存する
・拡張子をzipにして、解凍する
　　→docxは、zipファイルで固めてあるXML+画像ファイル
・word/_relsに、ファイル名とIDの対応が書いてある
・word/mediaの下にイメージファイルがある

　　→ここまで確認した。


よって、このあと、
word/mediaの下のイメージファイルの解像度を全て落とし、
もう一度zipで固めなおして、拡張子を.docxに戻せばよい？

・・・まだやってない。

オープンソースからMicrosoft Officeに再切り替え 山形県

オープンソースからMicrosoft Officeに再切り替え 山形県
http://www.itmedia.co.jp/enterprise/articles/1309/04/news112.html

Wordの文章を選択して、図形をクリックすると、図になるって、知ってた？

１．Wordで文字を書く


２．選択して、図形の「テキストボックス」を選択


３．すると・・・おお、図形になっている！動かせる


縦書きのテキストボックスでも、可能だった。
他はX

Office2003のWordなので、他でできるかどうかが不明。