投稿

1月, 2012の投稿を表示しています

ZumoDriveが同期されない。

イメージ
2年ほど前から、クラウド化の為にZomoDriveを導入し使用しておりました。
ZumoDriveは、「最大2GBまで無料で使えるオンラインストレージ」です。 ZomoDriveはDropBoxなど他のサービスと違い、端末側に同じ容量を必要とせず、インストールするとマイコンピューターに「Z:」(Z:が使用中の場合は他のドライブ)が追加され、ドロップすれば、簡単に各PC間でファイルの同期がはかれていたので、とっても重宝しておりました。
また、iPhoneにZomoDriveアプリをインストールするとiPhoneでクラウド上の曲を聞きながら歩くなんてこともでき、その上iPhoneの容量も気にすることはありません。DropBoxなどと比べるといまひとつマイナーなソフトでしたが、無料で2GB使用できるので、涙物のソフトでありました。 しかしです。
昨年の秋ごろから、各PCでファイルが同期がされなくなってしまいました。
いつもの様にz:ドライブのZumoDriveにドロップしても、他のPCで見るとコピーされてないのです。 ZomoDriveにコピーしたいファイルをドラッグしてドロップすると右下のZumoDriveの雲マークが動き、同期しようとしている?ような気がするのですが。。。 ZumoDriveのソフトを一度アンインストールし再度インストールしてみましたが、一向に改善しません。ネット上でもいろいろ検索しましたが、手がかりがなくお手上げです。 正直、がおった。 ( ̄~ ̄)ξ いまさら、USBメモリ等にデータをコピーし持ち運びするのも面倒ですし、小さいので紛失の心配もあります。 仕方ありません。他のクラウドサービスを探すことにします。
Evernote・Skydrive・iCloud・・・いろいろありますが。。
クラウドではありませんが、自宅にはBuffaloのルーターがあり簡易Nasの機能があるのでWebAccess機能を使い外出先からアクセスができますが、どうしても私は、Windowsのマイコンピュータからドラッグ&ドロップでファイルをコピーしたいので、どれもちと私のイメージと違います。 いろいろ探しましたら、ついにそして私の願いを叶えてくれる、Pogoplug(ポゴプラグ)という物と出会ったのです。 次回、「これってクラウド?Pogoplugに感動」につづく。

Excelでデータが入力されている行まで印刷する方法

イメージ
Excelであらかじめデータを入力しやすい様に、罫線と計算式入りの表を作成しておいて、その都度データを行単位で追加入力する場合があります。 当然、印刷する時はその都度マウスで印刷したい範囲を選択し、「ページレイアウト」>「印刷範囲」に設定します。 この操作をExcelなど全然わからない、おばさんに説明すると、「面倒だ」というのです。 確かにそうです。
データ数が多く何ページもに跨がる場合、マウスのボタンを押しながらスクロールして最後の行まで選択するのは。。。
もっと簡単にデータが入力されている最後の行まで、印刷する方法は無いのでしょうか。 そしたら丁度、日経パソコンの2012年1月9日号に連載されているExcel講座で「入力したところだけ印刷したい」という記事を発見。

この本を読めば私の希望が叶うはずです。 しかしこの記事だけを読むのに購入するのももったいないので、(セコイ)
ネットでサンプルの表をダウンロードページがあり、早速ダウンしサンプルを開いてみました。しかし何処にもそれらしきコードがありません。
やはり、仕掛けは見れないようになっているのですね。
(T_T)
http://pc.nikkeibp.co.jp/npc/download/morimoto_mm.html仕方ないので、ネットで検索しまくり、この方のページを参考にして記述してみました。
http://www.excel.studio-kazu.jp/kw/20040517093308.html下記を
1.ALT+F11キーで、VBを起動し、
2.プロジェクトウィンドウのThisWorkBook を Wクリック
3.中央の真っ白なウィンドウに以下のコードをコピーする。
-----------------------------------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim r As Long
    With Worksheets("Sheet1")
        r = .Range("B65536").End(xlUp).Row
        .PageSetup.PrintArea = "A1:H" & r
    End With
E…