Results of 1 - 1 of about 48855 for A�����������������������... (0.009 sec.)
- [[20080423113105]]
- #score: 1420
- @digest: 4c395bf98876da42053e8b9523a0906d
- @id: 37490
- @mdate: 2008-04-23T03:07:10Z
- @size: 1703
- @type: text/plain
- #keywords: na2 (13625), na1 (12773), 列結 (12420), 本与 (7748), 葉太 (7748), 村二 (7380), proffesional (5832), 年太 (5803), 合1 (4728), 与太 (4573), 合2 (3950), 苗字 (3820), 万年 (3258), 田三 (3139), 字名 (3128), 字記 (3122), 田村 (2960), 藤一 (2945), 題1 (2810), 郎6 (2784), 題2 (2767), 数記 (2726), 郎5 (2622), 郎4 (2322), 逆だ (2056), 郎3 (1980), 結合 (1949), 二郎 (1794), 入後 (1539), 前2 (1234), 三郎 (1101), 一郎 (969)
- 『文字列結合について』（万年太郎）
今日は。A列に苗字、B列に名前を入れたリストが下記の様になっています。 A列とB列を結合してD列に氏名を転記するVBAを作ったのですが、問題があり、わからず投稿します。 問題1:文字列結合1では実行後、A列、B列が消え、D列に"-"しか表示されない 問題2:文字列2を実行するとA列の苗字記入後にスペースを入れてしまうとD列にそれがそのまま反映される A B 1 苗字 名前 2 伊藤 一郎 3 田村 二郎 4 山田 三郎 5 山本 与太郎 6 千葉 太郎 Sub 文字列結合1() Dim a As Integer Dim na1, na2 As String For a = 2 To Range("A" & Rows.Count).End(xlUp).Row Cells(a, 1).Value = na1 Cells(a, 2).Value = na2 Cells(a - 1, 4).Value = na1 & "-" & na2 Next a End Sub Sub 文字列結合2() Dim a As Integer For a = 2 To Range("A" & Rows.Count).End(xlUp).Row Cells(a - 1, 4).Value = Cells(a, 1).Value & Cells(a, 2).Value Next a End Sub WindowsXp(Proffesional) Excel2003 ---- こんな感じ? Sub 文字列結合1() Dim a As Integer Dim na1 As String, na2 As String For a = 2 To Range("A" & Rows.Count).End(xlUp).Row na1 = Cells(a, 1).Value na2 = Cells(a, 2).Value Cells(a - 1, 4).Value = na1 & "-" & na2 Next a End Sub Sub 文字列結合2() Dim a As Integer For a = 2 To Range("A" & Rows.Count).End(xlUp).Row Cells(a - 1, 4).Value = Trim(Cells(a, 1).Value) & Trim(Cells(a, 2).Value) Next a End Sub (1or8) ---- 1or8さん、すばやいレスありがとうございます! 文字列結合1では変数記述の順序が逆だったのですね。逆だとこうも違うとは! 文字列結合2ではTrimという関数をすればいいのですね。 大変勉強になりました! m(__)m m(__)m m(__)m (万年太郎）... - https://www.excel.studio-kazu.jp/wiki/kazuwiki/200804/20080423113105.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97054 documents and 608268 words.
訪問者：