FC2ブログ
エホバの証人二世の、個人研究&趣味blogです。
2019/07«│ 2019/08| 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 31 »2019/09
文字色の変化のON/OFFが出来ます。文字サイズ文字サイズ:大文字サイズ:中文字サイズ:小
00:35:06
Sub コピーしてフィルター()
ActiveSheet.Copy
Range("A1").Select
Selection.AutoFilter
Dim MaxRow As Long
Dim MaxCol As Long
On Error Resume Next
With ActiveSheet.UsedRange
MaxRow = .Find("*", , xlFormulas, , xlByRows, xlPrevious).Row
MaxCol = .Find("*", , xlFormulas, , xlByColumns, xlPrevious).Column
End With
On Error GoTo 0
Dim buf As String
buf = InputBox("フィルター")
Range(ActiveSheet.Range("$A$1"), ActiveSheet.Cells(MaxRow, MaxCol)).AutoFilter Field:=1, Criteria1:=buf _
, Operator:=xlOr, Criteria2:="="
End Sub

コピーしてフィルターを使います。とりあえず新しいブックに貼り付けてくれます。
アクティブシートとか選択はまた後ほど。。。ブックを開いてたらやれば良いのかなあーーー。








日本の首都 東京。
その名前を使った熱~いサイト東京ホットを本格的にレビュー

東京ホット
2018/06/24
12:03:06
二日間仕事はしてもブログは更新しませんでした笑
ブログはあまり稼げないときもありますが、今回はサイト一つ登録したので、1000円近く稼げましたよ😃

後はTEのやり方とかも分かってきてので少しずつがんばっています。
全体で頑張って週に1000円稼ぐことがとりあえずの目標です!!!




これがめっちゃ欲しいです♥
男女兼用って……ツレにも着せたい。



脱毛の市場規模をご存知ですか?

なんと約3‚000億円です!



この数字を多いと感じるか、少ないと感じるかは、あなた次第ですが・・・。

今、女性にも、男性にも「脱毛」は大人気です!



本日は、脱毛サロンの「比較・口コミ」を多数掲載するおススメブログのご紹介をさせていただきます!
それは、「脱毛サロン しっかり比較」というブログです。このブログは、日々、世の中に多数存在する女性向けの脱毛サロンのデータを収集し続けて、比較・分析を行っているブログです。



「比較・分析力」は、客観性重視なのでとってもスゴイ!!分かりやすい。

また、「脱毛コラム」がとっても充実していて、時間のある時に読んでいると、面白いです。

それに、「口コミ」は、多数の脱毛サロンに関するものが数多く集められているため、比較しながら見ることができます。



このサイトは、元プロ脱毛技能士が立ち上げたサイトなので、比較データの情報量・口コミ・コラムが充実しています!



脱毛サロンをお探しのみなさんに、できる限り分かりやすく「比較」した結果を解説するよう努めているブログです。ぜひ、ご覧ください!



URL : http://number1salon.com/

サイト名 : 脱毛サロン しっかり比較

今度脱毛行くので使ってみます。
07:28:19
INDIRECT式を使うときにVALUEを使わなければならないときに・・・・・・入れていなかったので入れました。

Sub a()
For Each Target In Selection
If Target.HasFormula Then
k = Target.Formula
k = Replace(k, "INDIRECT", "value(INDIRECT")
k = k & ")"
Target.Formula = k
End If
Next
End Sub
一括で入力出来るので楽で楽しいです。




何も考えたくないので・・・・・・。(笑)




[聖句] 一人の人を通して罪が世に入[った]。(ロマ 5:12)
[注解] 「一人の人」アダムを通して罪と死が「世に入り」ました。「一人の人の罪過により、……死が王として支配した」のです。パウロはさらに、「一人の方イエス・キリストを通し」、「[神の]過分のご親切」が「満ちあふれるほどに」示された、と述べています。(ロマ 5:12、15、17)その過分のご親切は、全人類に益をもたらします。「一人の方[イエス]の従順を通して多くの者が義とされる」とあるとおりです。神の過分のご親切によって、「イエス・キリストを通して来る永遠の命」を得ることができるのです。(ロマ 5:19、21)エホバには、贖いとしてみ子を地に遣わす義務はありませんでした。それにもかかわらず、神は、人間の罪が許されるようイエスを贖いとして与えてくださいました。不完全で罪深い人間は本来、そうしていただくに値しない立場にありました。ですから、罪が許され、永遠に生きる見込みが与えられたのは、まさに過分のご親切と言えます。わたしたちは、神の過分のご親切の賜物に深く感謝し、日々の生活においてその感謝を表わすべきです。塔研16.12 1:1、6、7
2018/06/20
19:13:43
課題が毎日見つかるうちは頑張れるかなと思っています。
この課題が毎日見つからなくなったら終わりかなと思っています。
まぁ、そんなもんかな~。

今は毎日毎日思い付くこともあるし、成長もあるし楽しいよ💃


さて、今は羽生結弦さんの本を読んでいます。
なんか、やっぱり好きです。
プリンスの曲のショーとプログラムとか良かったなぁ……。

23:03:10
「DB一行貼り付け」

DB一行貼り付け.xlsm

DB一行貼り付け


DB一行貼り付けのマクロを作りました。
選択した部分に一行入ってくれます。エクセルとワードを組み合わせて使うときなんか便利ですね。
差し込み文書様々の人は是非b
プロフィール

はなかな

Author:はなかな
FC2ブログへようこそ!

最新記事
最新コメント
月別アーカイブ
カテゴリ
フリーエリア
ランキング参加しています。 にほんブログ村 哲学・思想ブログ エホバの証人へ にほんブログ村 にほんブログ村 本ブログ 読書日記へ にほんブログ村 にほんブログ村 音楽ブログへ にほんブログ村
音楽(J-POP) ブログランキングへ
小説(読書感想) ブログランキングへ
キリスト教 ブログランキングへ
ブログランキング ブログ王ランキングに参加中!
検索フォーム
RSSリンクの表示
リンク
このブログをリンクに追加する
ブロとも申請フォーム

この人とブロともになる

QRコード
QR
FC2アフィリエイト