最近、大きなシートが再フォーマットされました。私はvbaにあまり精通していませんが、私はいくつかのことを知っていて、できる限りベストを尽くしました。コンテンツを移動して1つの列からセルを分離する
これには、電話番号、いくつかの電子メールアドレス、およびウェブサイトを持つ列があります。
私はあなたにそれがどのように、どのようにあるべきか、そしてどれだけ遠くにあるべきかの小さな例を示しました。あなたが見ることができるように
私はId
後に2つの列を挿入し、
Phone number
、
E-Mails
と
Website
にヘッダーの名前を変更しました。番号を移動することは本当に難しいことではありませんでしたが、私は電子メールアドレスとウェブサイトを移動する際に苦労しています。オリジナルシート
Id
、
Phone number
で
、...左上(Id
A1、B1 Phone number
、...)である
空の行がファイルにありません。電子メールアドレスとウェブサイトの違いを見つけるには、セルに@
が含まれているかどうかを調べます。誰かが私に、我々はコードを見ることができない場合は、私たちが支援するためにハード
を助けることができればそれは素晴らしいことです。それをあなたの質問に編集するのを忘れないでください。 @シンボルのチェックに関しては、 'InStr(ADDRESS_TO_CHECK、" @ ")'(Instrのドキュメント:https://msdn.microsoft.com/en-us/library/8460tsh1(v=vs.90) ).aspx) – Mikegrann
あなたの電話番号が@チェックを通過するので、WebサイトのInstr(1、ADDRESS_TO_CHECK、 "www")のようなものを使用します。あなたはこれまでどんなコードを試しましたか? –
これまでのコードを投稿してください。また、あなたのデータは[電話番号]、[電子メール]、[ウェブサイト]のように見えます。それはいつも**のようになるだろうか?あるいは、[電話番号]、[ウェブサイト]、[電子メール]、[ウェブサイト]のような組み合わせがありますか? – BruceWayne