私はコンサルタントだった時、上司から 「コンサルタントは意思決定するな」と口を酸っぱくして言われた。 「特に人事。人事に関しては、意見表明もできる限り避けること」 とまで言われた。 例えば、「ウチの取締役、どう思う？」など、人の印象について聞いてくる経営者は少なくない。 確かに、結構怖い質問だ。 その一言が、どのように波及するかわからないのだから。 それに対しては 「社長のお考えを聞きたく」と言い、はぐらかせ、というのだ。 要するに、リスクヘッジである。 「それでも、意見を求められたら、どうしますか？」と質問すると、 「それを言える立場ではないと言いなさい」と指導された。 ＊ しかし後日、一人の経営者に意見を求められた時のこと。 社長は「あいつのパフォーマンスについて、どう思う。」と私に尋ねた。 あー、答えちゃいけないやつだ、と思い、「社長のお考えを聞きたく」というと、 「意見を求められた

データベースとして使いたい表なのに、結合セルだらけで使い物にならない。 そんなときに、VBAで作ったマクロを起動するだけで、 結合セルを解除して 元々入っていた値を、結合されていたすべてのセルに入力する マクロを紹介します。 ソースコードを貼り付けて実行するだけなので、1分もかからずに、表を整形できます。 ソースコード 下記を、標準モジュールに貼り付けて実行してください。 Sub UnmergeCellsAndFillValues() Dim rng As Range For Each rng In ActiveSheet.UsedRange If rng.MergeCells Then With rng.MergeArea .UnMerge .Value = .Resize(1, 1).Value End With End If Next End Sub 解説 For Eachループ F