Hỏi về array của picutre (1 người xem)

[Tnhatanh68]

Mình muốn chèn một hình lấy từ link trên mạng về

Sau khi chèn bằng lệnh

ActiveSheet.Pictures.Insert( _
k).Select 'với k là đường dẫn'

Thì mình muốn xóa nó đi, mình làm theo Record thì nó hiện ra là Array("Picture 8") như dưới.

ActiveSheet.Shapes.Range(Array("Picture 8")).Delete

Nghĩa là phải cố picture mấy thì mới xóa được. Mình muốn hỏi người nào biết là làm sao xác định số picture đang hiện hành trên file excel này để thêm vào để xóa đi. Mình làm thì cứ thêm 1 hình thì nó lại gia tăng thêm 1 (picture 8 thì lên 9) nhưng mình không biết số đang hiện hành là số mấy. Các bạn giúp mình với, cảm ơn

 

[jack nt]

Nghĩa là phải cố picture mấy thì mới xóa được. Mình muốn hỏi người nào biết là làm sao xác định số picture đang hiện hành trên file excel này để thêm vào để xóa đi. Mình làm thì cứ thêm 1 hình thì nó lại gia tăng thêm 1 (picture 8 thì lên 9) nhưng mình không biết số đang hiện hành là số mấy. Các bạn giúp mình với, cảm ơn

khi chèn hình tên PictureK tự động tăng số hiệu thêm một. dù bạn xóa hinh thì cái số hiệu vẫn tăng dần. trừ phi bạn đóng file rồi mở lại thì nó sẽ lại tính từ 1.
khi chèn hình bạn nên đặt tên (chẳng hạn "HinhMoi") cho dễ xử lý về sau

With Sh.Pictures.Insert(<ten_hinh_voi_day_du_duong_dan>)
    .Name = "HinhMoi"
    [COLOR=#0000cd].Left = X; Top = Y; Width = W ...[/COLOR]
End Width

tên hình không được trùng với các tên đã có. khi cần xóa gọi thẳng tên

Sh.Shapes("HinhMoi").Delete

p/s: thêm cái dòng xanh xanh để định vị và điều chỉnh kích thước

 

[Tnhatanh68]

khi chèn hình tên PictureK tự động tăng số hiệu thêm một. dù bạn xóa hinh thì cái số hiệu vẫn tăng dần. trừ phi bạn đóng file rồi mở lại thì nó sẽ lại tính từ 1.
khi chèn hình bạn nên đặt tên (chẳng hạn "HinhMoi") cho dễ xử lý về sau

With Sh.Pictures.Insert(<ten_hinh_voi_day_du_duong_dan>)
    .Name = "HinhMoi"
    [COLOR=#0000cd].Left = X; Top = Y; Width = W ...[/COLOR]
End Width

tên hình không được trùng với các tên đã có. khi cần xóa gọi thẳng tên

Sh.Shapes("HinhMoi").Delete

p/s: thêm cái dòng xanh xanh để định vị và điều chỉnh kích thước

Thật hay, cảm ơn bạn nhiều

Nhưng không biết tại sao khi mình mở file excel trên iPad thì nội dung thì thấy nhưng hình thì lại không thấy nhỉ? Dù mình đã cố chỉnh các kiểu nhưng vẫn không thấy hình. Trên file máy tính vẫn nhìn bình thường. Như vậy có phải liên quan gì đến thuộc tính của hình không?

xin cảm ơn mọi người

 

[ndu96081631]

Thật hay, cảm ơn bạn nhiều

Nhưng không biết tại sao khi mình mở file excel trên iPad thì nội dung thì thấy nhưng hình thì lại không thấy nhỉ?

Tôi chưa xài sản phẩm của Apple lần nào nhưng tôi đoán chắc nhờ vậy mà Windows "sống" được đó
Lời khuyên: Muốn LÀM VIỆC THẬT SỰ thì nên xài Windows (mấy "chú khác" chỉ để coi phim x chứ chẳng được tích sự gì)

 

[Tnhatanh68]

Tôi chưa xài sản phẩm của Apple lần nào nhưng tôi đoán chắc nhờ vậy mà Windows "sống" được đó
Lời khuyên: Muốn LÀM VIỆC THẬT SỰ thì nên xài Windows (mấy "chú khác" chỉ để coi phim x chứ chẳng được tích sự gì)

Em xin gửi lên cái file em có chèn hình. Khi đem file này gửi mail thì khi mở mail lên, load về đọc bằng máy tính thì nó hiện như trong hình em gửi, nếu đọc trực tiếp mà không load về thì không thấy luôn. Sau khi click vào eddited contents thì nó mới thấy hình. Còn nếu mở bằng ipad thì chịu. (Gửi mail dạng Enable macro ) Nhờ anh và mọi người xem giúp ạ

 

[ndu96081631]

Em xin gửi lên cái file em có chèn hình. Khi đem file này gửi mail thì khi mở mail lên, load về đọc bằng máy tính thì nó hiện như trong hình em gửi, nếu đọc trực tiếp mà không load về thì không thấy luôn. Sau khi click vào eddited contents thì nó mới thấy hình. Còn nếu mở bằng ipad thì chịu. (Gửi mail dạng Enable macro ) Nhờ anh và mọi người xem giúp ạ

Vậy ipad của bạn có dùng được code VBA không? Vấn đề nằm ở chỗ đó