Excel総合相談所 88 - 暇つぶし2ch

Excel総合相談所 88 at BSOFT

139:134
09/11/10 11:54:36
Private Sub UserForm_Initialize()
Dim lastRow As Long
Dim ReturnBook As Workbook, TargetBook As Workbook
Set ReturnBook = ActiveWorkbook
Application.ScreenUpdating = False
Set TargetBook = Workbooks.Open("D:\test\sample.xls")

With Worksheets("商品マスタ")
lastRow = .Cells(Rows.Count, 1).End(xlUp).Row
End With
With ListBox1
.ColumnCount = 3
.ColumnWidths = "50;50;50"
.RowSource = "商品マスタ!B2:D" & lastRow
End With
ReturnBook.Activate
Application.ScreenUpdating = True
TargetBook.Close
End Sub

とりあえずリストボックス自体はなんとか表示することは出来たのですが、
リストボックスの最終行が文字化けしてしまい、
この操作を完了するのに十分な記憶域がありません。とエラーが出てしまいます
助けて下さい・・・

140:名無しさん＠そうだ選挙にいこう
09/11/10 21:25:46
【1 OSの種類　　　　 .】 Windowsxp
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】否
【5 検索キーワード　　】

URLﾘﾝｸ(www1.axfc.net)
説明の仕方が分からないので図に描いてみました。
図の様に文字書きたいんですができますか？

141:名無しさん＠そうだ選挙にいこう
09/11/10 22:43:25
>>140
絵が汚すぎﾜﾛｽ

それはともかく、
セルを結合することはできるけど分割することはできない。
だから、A列を二つに分割してそれぞれに文字を入れるようなことはできない。
ただし、A列とB列を結合しておいて、必要に応じて結合を解除するのならできる。

あるいは単にテキストボックスやオートシェイプを使って、セルが分割されているように見せかけることはできる。

エクセルはそもそも「表を作るツール」ではないので、あまり柔軟な表を作ることはできない。
複雑な形の表を、計算とかをさせるのではなくてただ表として表示するための目的で作るのなら、
ワードなどの他のソフトを使って作るべき、と一応言っておく。

142:名無しさん＠そうだ選挙にいこう
09/11/10 22:51:39
>>141
ありがとうございます。
今回は計算の必要ないのでワードで挑戦してみます。

143:名無しさん＠そうだ選挙にいこう
09/11/10 23:23:23
【1 OSの種類　　　　 .】 Windows xp
【2 Excelのバージョン　】 Excel2003
【3 VBAが使えるか　　 .】いいえ
【4 VBAでの回答の可否】否
【5検索キーワード】
エクセル初心者ですいません
vlookupで表示した数字が日々更新されるのですが、例えば数字更新時に昨日の数字をひとつ隣のセルに移行し更新した数字を昨日数字があった場所（元の場所）と言った形で表示することは可能でしょうか？

簡単に言ってしまうと
数字を更新したら前の数字が自動で一個右のセルにずらしたいのです。
ただ表示されている数字がvlookupを使ったものでエクセル始めたばかりではわかりません･･･
よろしくおねがいします。

144:複乳 ◆MeiY43UMr.
09/11/10 23:31:26
fgv

145:複乳 ◆MeiY43UMr.
09/11/10 23:32:55
>>143

146:複乳 ◆MeiY43UMr.
09/11/10 23:34:47
>>143
値を残したいならVBAしかない
=now=tofdayは今の日付などをのこせるが　こう新されてしまう
VBAがダメなら値で貼り付けをうまく使うしかない

147:名無しさん＠そうだ選挙にいこう
09/11/10 23:40:21
素早い解答ありがとうございました。
更新の数字が多すぎるのでどうにかならないのかと思い質問しました！

148:名無しさん＠そうだ選挙にいこう
09/11/10 23:46:53
複乳はどんなつまらない質問にも真正面の回答だな。
質問者は喜ぶだろうが本人のためにならないと思うぞ。

>>143へ
日々更新されるようなデータは縦に並べるべし。
右にずらすなんてやっちゃだめ。VBAでできてもだめ。

149:複乳 ◆MeiY43UMr.
09/11/11 00:01:07
>>147
CTRL+Aで全選択
その状態でコピー、右クリックの形式を選択して～の値で貼り付け
で数式の結果が阿多タイで保存される
>>148
つまんねー仕事にはしばしば共感できるところがある。散々やってきたからね
それで大体予想できたりもする。まぁ外れてるかもしれないけどね
「A1+A2の結果をプリンタアウトしてB1に入れてB2に足せ」みたいな仕事なんて仕事聞いたことがある?
ないなら普通の会社です。あるなら俺と同じです。
中小・零細には多分しょっちゅうある。周りにはあった。そういうウンコ以下の仕事を正面切って解決してあげたい
というのが俺の思い
無駄に「B2=A1+A2でいいんじゃないですか」というと無駄に怒られるからね
俺がそうだったから
ただ効率化できそうなところは私の知識を尽くして助言はしているつもりだよ

150:名無しさん＠そうだ選挙にいこう
09/11/11 00:16:29
>>149
私は違うな。そうは思わない。
つまらないものはつまらない。
つまらないものに価値は無い。

私もお前と同じで、つまらない仕事を何度も強制されている。
でもそこからどっちに進むかが違うんだな。
つまらない質問にお前がつまらない回答をすると、つまらない手法が大量生産されてしまう。
VBAで値を右にコピーする方法を覚えた>>143は、何年か後になって自分の後輩や部下にゴミみたいな仕事を伝承していくんだぞ。
ちょうどお前が経験したように。

151:複乳 ◆MeiY43UMr.
09/11/11 00:43:48
>>150
私は違うな。そうは思わない。
つまらないものはつまらない。
つまらないものでも　価値は　ある

私がそうだったので言うが
私の上司は本当にウンコみたいな作業を仕事といってはばからない人だった
-中略-
その人は首になった。今私はその業務をVBAに置き換えて別の方々と仲良くやっている
まぁ、上司を殺すために自分がイエスマンになって技術を蓄えるか
上司を説得してその職場自体を帰るか、の違いだろうね
私はその前者を見越してイエスマンになった
そしてチクリにチクった後、その人がクビになり、私は総務を任される(システム上ね)立場になった
その後0からシステムをたちあげ・・
というしょーもない経緯があるため、どうみてもしょーもない仕事に対しては
できるだけ「その裏にある意向に沿うように」全力を尽くしている
つもりである

例え私が間違っててもまあ、その人が技術を積んでいけばまたこのスレに来るか
勝手に技術を習得することだろう、と信じてね

ただやはり向上心があることを前提にした手法を教えてることは、否めないかもしれない
あと俺自身未熟なため、かなり行き当たりばったりだし。逆にすぐに回答が出せるという長所があるかもしれない

152:複乳 ◆MeiY43UMr.
09/11/11 00:46:55
飲みすぎた
寝るぜ

153:名無しさん＠そうだ選挙にいこう
09/11/11 09:03:12
今学生です。就職活動のためにエクセルを少しは使えるようになったのですが、
アクセスって覚えたほうが良いですか?
それともエクセルを極めたほうが良いでしょうか?

154:名無しさん＠そうだ選挙にいこう
09/11/11 09:40:55
両方使えたほうがいいだろうが、中途半端が一番つかえないな。

155:複乳
09/11/11 09:53:39
エクセルはほぼ100%入ってるだろうけど、アクセスが微妙なとこだな
アクセスはシステムが既に組まれていて、入力のみというパターンが多いと思う
大企業ならデータベースのデータをひっぱって来る技術があるといいかも
中小なら自分がデータベース組めると非常に便利かも。ソフトがインストールされてればの話だけど
エクセルはvlookup使えれば大体なんでもこなせると思う

156:名無しさん＠そうだ選挙にいこう
09/11/11 10:30:13
ありがとうございました
色々調べてみようと思います

157:名無しさん＠そうだ選挙にいこう
09/11/11 19:08:12
SEって誰でもできるのかぁ

158:名無しさん＠そうだ選挙にいこう
09/11/11 20:50:30
>>153

エクセルはほどほどにしておいて、アクセスを使ってみてほしい。
アクセス知らずにエクセルだけで突き進むとバッドテクニックばかり身につけてしまうぞ。
逆にアクセスをちょっとかじってるだけで、エクセルの使い方のセンスもよくなる。

159:名無しさん＠そうだ選挙にいこう
09/11/11 21:29:49
久々に来たらコレがいてﾜﾗﾀ