VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2004/01/05(Mon) 11:27 |
| 投稿者 | ： mami |
| ＵＲＬ | ： |
| タイトル | ： エクセルのオートシェイプについて |
初めて投稿させて頂きます。 mami と申します。
VB6.0 より Excel のオートシェイプを90度回転させたいのです。
Excel のマクロで、次のようにするのだと言う事は分かったのですが、
xlsShape.ShapeRange.Rotation = 90#
これでは、
実行時エラー：438
オブジェクトは、このプロパティまたはメソッドをサポートしていません。
というメッセージが表示されます。
オートシェイプを Excel に追加する時に、テキストを追加したい為に下記のとおりの方法を使ってい
ます。
Set xlsShape = xlsSheet.Shapes.AddShape(51, 35.25, 35.25, 43.5, 16.5).TextFrame
自分なりに調べたところ、ShapeRange がどうやっても使えないようなのです。
何か方法はありませんか？
何卒、宜しくお願い致します。 m(__)m
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）