致命的?

 ★ オートメーション エラーです。 致命的なエラーです。 ★ 
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
 今日の塗り絵、奈瀬明日美です、色塗ってみたけどなかなかうまく塗れません。
 まあ、いつもの事ですが(;^_^A
 s-nase15.jpg

 今日も10月の基幹システムの入れ替えとそれに伴うOfficeの入れ替えの動作検証をしておりました。
 それでですね、突然「オートメーション エラーです。 致命的なエラー」が発生してどうにもならなくなり焦りました。(;^_^A
 結果的には別の端末からファイルを開いて共有を解除したら直りました。
スポンサーサイト



64bit版(;^_^A

 ★ Declare PtrSafe ★ 
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
 今日職場では32bit版で作成したエクセルのVBAが64bit環境でも動作するようネットで調べては修正、調べては修正していました。なかなかうまくいかず、四苦八苦しましたが大半は動作するようになりました。 それで、今日の落書きなんですが、昨日アップした落書きの元ネタ、ヒカルの碁を読みふけってしまい気が付いたら23:00時(;^_^A
 多分今から書いても明日アップする感じになりそうです。
23:36UP
 s-konsyuugou.jpg

しゃくれちゃった

 ★ 奈瀬 明日美★ 
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
最近、スカパーのキッズステーションでヒカルの碁やってたのでコミックス引っ張り出して描いてみました。描いてみたけど、なんだかしゃくれてしまいましたね。(18巻表紙から)
s-nase01.jpg

これから別の書き直します。

でですね。書き直してみたけど似てないです。
s-nase2.jpg
眼が大きすぎた?幼く見える?
も一度修正
s-nase3.jpg
ダメだやっぱり似てない。
明日はジャンプ出るしそれで明日のお題を探すとします。

ぬりぬりOrz,

 ★ 上手く塗れないです ★ 
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
今日は土曜日で時間はあったのになかなか手を付けず。
少し前に塗り絵再開したんですけど難しいので今日はここまでです。
s-kokomade.jpg
来週からは別の絵を描くことにします。

いつかこれで4コマを

 ★ スライドショーと読み上げ ★ 
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
 最近描いたらくがきを使ってスライドショーと読み上げをやってみました。
 いつかはこれで四コマ漫画描いてみたいです。
Private Sub CB1_Click()
Dim bangou, a, n As Long
Dim picst, serifu As String
a = Range("F1").Value '開始番号
n = Range("H1").Value '終了番号
For bangou = a To n
DoEvents
Range("B1").Value = bangou
DoEvents
serifu = CStr(Range("D1"))
Application.Speech.Speak (serifu)
Call AdPic
DoEvents
Application.Wait Now() + TimeValue("00:00:01")
Next bangou
Sheets("code").Select
Application.Wait Now() + TimeValue("00:00:04")
Sheets("End").Select
Application.Speech.Speak ("ご視聴ありがとうございました")
End Sub



続きを読む

参照不可?

このマシンでは利用できないため、オブジェクトを読み込めませんでした。
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
昨日少し話したテスト端末…
Excel2019orExcel365かと思えばExcel2016しかも64bit版…
少し危惧していたのですが、マクロが動いてくれません。
「このマシンでは利用できないため、オブジェクトを読み込めませんでした。」にはじまりDateがライブラリにありませんとかいろいろ噴出、ユーザーフォームも開けません。
結構な数使用していたDate and Time Picker コントロールも使えなくなっていました。
なんだか調べてみるとLong型がLongLong型とかいろんな32bit版と64bit版の違いが分かってきて
何だかなぁーって感じです。
それから参照不可になっていたMSCOMCT2.OCXはWin7にあったものをネットワーク越しにリモートでコピペしようとしたけど権限無くて弾かれて、管理者にたのんでコピペしてもらいました。
(※うちに帰ってしらべたら間違った方法でした。マネしちゃだめですよ^^しないと思いますが)
それでなんですがDateとかChr等は認識するようになりました。
そうそう、新しい基幹システムにはまだ接続できませんでした。
という感じで、今日はなんだか疲れました。
 このあとらくがききするつもりでしたがやめにしときます。(でもやるかも)

昨日の続き

 ★ 塗り絵は絶賛頓挫中 ★ 
 ご訪問頂きありがとうございます。アラ×Δ§キ(阿良々木)です。
 昨日の小ネタを登場人物10人分、フルネームで再実行してみました。
 ↓PCからは見れるのにスマホからだと見れませんでした。なんでだろ?

 らくがきの方は、上手く塗れないので、またエクセルいじってました^^
 明日から10月稼働予定の新基幹システムのテスト端末が設置されます。
 仕事をらくにする為に、かなりの数のマクロ有効ブックを使っているのですが少しの手直しで使えるかどうかわかりません。
 実際に新基幹システムに触れるのははじめてなのですが、SEさんの話を聞く分には使いづらそう。
 まあ、明日になればわかるのですが正直なところ不安です(;^_^A 

噛まずに読み上げられるのか?

 ★ Application.Speech.Speak ("阿良々木") ★ 
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
 塗り絵に行き詰ったのでエクセルの小ネタ。
 エクセルのVBAで「阿良々木」を噛まずに読み上げできるか試してみました。
 Application.Speech.Speak ("阿良々木")

あら×Δ§き?よく聞き取れません。

ぬりぬり

 ★ 今日は塗り絵 ★ 
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
 昨日に引き続き、続きです。
s-atosukosi.jpg

ペン入れの練習

 ★ 昨日の続き ★ 
 ご訪問頂きありがとうございます。アラクリカエシキ(阿良々木)です。
 今日からはしばらく、昨日の下絵にペン入れして、最終的には色を塗るところまで挑戦したいと思います。
 普段らくがきはラスターレイヤーに鉛筆を使っているのですが。今日はベクターレイヤーに丸ペンで描いています。
 いつも上手くいかず、すぐDeleteキー押すのでそうならないうちに描きかけをアップしておきます。
 s-kakikake.jpg
続きが描けたらまたアップします。


s-penire.jpg
難しいです。


s-ironuri.jpg
今日はこの辺で終わりにします。

訪問者さま
カレンダー
05 | 2020/06 | 07
- 1 2 3 4 5 6
7 8 9 10 11 12 13
14 15 16 17 18 19 20
21 22 23 24 25 26 27
28 29 30 - - - -
プロフィール

arakurikaesiki

Author:arakurikaesiki
阿良々木(あらくりかえしき)と申します。趣味はらくがき/アクアリウム、好きな小説は物語シリーズです。あと、仕事で楽したいためにExcelのVBAをちょくちょくいじってます。
なお、当ブログはリンクフリーです、よろしければリンク貼ってください。
また、ブロともさまも募集中です。コメントとかもらえるとすごく喜びます。

ブロとも様募集中ですm(_)m

この人とブロともになる

最新コメント
リンク(敬称略)
らくがき
新着記事
郵便番号で住所入力(エクセル) Nov 24, 2020
ひさびさのらくがき Nov 22, 2020
郵便番号・・・ Nov 20, 2020
母が転んで骨折し入院・・・ Nov 19, 2020
参照不可? Oct 20, 2020
基幹システムの入れ替えと使えなくなるファイルメーカー Sep 30, 2020
季節の変わり目 Sep 01, 2020
ロード長くね? Aug 19, 2020
ルフィを描いてみた Aug 17, 2020
囲んで塗る? Aug 14, 2020
カテゴリ
アクセスランキング
[ジャンルランキング]
ブログ
3657位
アクセスランキングを見る>>

[サブジャンルランキング]
イラストブログ
140位
アクセスランキングを見る>>
にほんブログ村(ビオトープ)
月別アーカイブ
人気ブログランキング
更新通知登録ボタン

更新通知で新しい記事をいち早くお届けします

検索フォーム