だいぶ前からYoutubeでも3D立体動画が観られるようになった。 そうなると自分でも作ってアップしてみたくなるのは人情というもの。 だが、立体視の可能な動画の形式にはいろいろあって、どの形式を用意してアップしたらいいの
Youtubeにサイドバイサイドの3D動画をアップしてみた
PIC18F14K50 ADC --> PWM --> LED
PIC18F14K50 で PWM の覚書き データ・シートに、 Period = 4 * TOSC * (PR2 + 1) * (TMR2 Prescale Value) Pulse Width = TOSC * (C
ELECOM LBT-PAR500 + Panasonic RP-HZ47 で余った線の処理
ヘッドホンの配線が長すぎてうっとうしい。 ぶった切って短くしたところへ秋月でステレオミニプラグでも買ってきて つけようかと思ったが、結局、こんなものをダイソーで買ってきた。 使い方 こういう感じになる コードをぐるぐる巻
PC上のtsファイルをAndroid端末から再生する。
tsはデコード時の負荷が大きすぎてAndroidからはまともに再生できないだろうという勝手な思い込みがあった。 したがって、今までは、デコードはPC上で行って結果をAndroid端末上で観るという発想だった。 [ PC
オープンエアでワイヤレスでオーバーヘッドでないヘッドホン
オープンエアでワイヤレスでオーバーヘッドでないヘッドホンを探すと、少なくとも価格COMでみた限りで現行では商品が存在しない。 そこで、あれこれ探した結果、行き着いたのがこんなヤツ、ELECOM LBT-PAR500。 要
安いBluetoothドングルのドライバーをインストールする
安いUSB Bluetoothドングルを買ったのはいいが、どうもドライバーがちゃんとインストールされずに、こんな状態。 そこで、うろうろしていたら、Bluetooth Driver Installer(http://bl
100均グッズで作った照明付き拡大鏡
チップ部品とかを扱うようになって、拡大鏡は必須となり、それと同程度に照明も重要になった。 最近使っている、100均で買ったグッズを使って作った拡大・照明器具がこれ。 基本的には、金属のパーツをボルトで止めたものの先に虫眼
フォントのジャギーが目立つのを直す
OSを再インストールしてからなのか時期はよく分からないが、表示されるフォントのジャギーが目立つことに気づいたので、その対処方法の覚え書き。 スタートの手順は以下のとおり。 以後、指示に従って進めていけばいい。 上の１枚目
LibreOffice Calc データの範囲を得る
当然ながら、マクロでデータの入っているセルの範囲を指定することは多い。 そこで、以下はデータの入っているセルの範囲を得るマクロ。
|
1 2 3 4 5 6 7 8 9 10 |
Sub GetLastCellPosition() Dim objSheet As Object Dim objRange As Object Dim objCursor As Object objSheet = ThisComponent.CurrentController.Activesheet objRange = objSheet.getCellRangeByName("A1") objCursor = objSheet.createCursorByRange(objRange) objCursor.gotoEndOfUsedArea(True) Msgbox(objCursor.Rows.Count & " ： " & objcursor.Columns.Count, 0, "データのある最終の行：列") End Sub |
実行すると、以下のように
LibreOffice Calc ボタンのクリックで選択セルに現在の日時を代入する
LibreOffice Calcで、シート上に作成したボタンをクリックすると、そのとき選択されていたセルに現在の日時を表す文字列を代入する。 マクロはこんだけ。 [crayon-6997b8f01a97745490669