Εμφάνιση ενός μόνο μηνύματος
  #5  
Παλιά 16-10-13, 20:27
sotisanis Ο χρήστης sotisanis δεν είναι συνδεδεμένος
Όνομα: Σωτήρης
Έκδοση λογισμικού Office: Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 26-05-2011
Περιοχή: Θεσσαλονίκη
Μηνύματα: 91
Προεπιλογή

Τασο βρηκα μια λυση ειναι αυτη

Κώδικας:
Sub Macro1()
Application.ScreenUpdating = False
Sheets("neo").Cells.Copy
Sheets("prod").Cells(1, 1).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

Που στην ουσια μου κανει το εξης: κανει αντιγραφη του φυλλου neo στο prod αλλα θελω να το κανω να περνει απο αλλο βιβλιο και αυτο το βιβλιο να ειναι σε καποια σελιδα στο internet.

Καμοια βοηθεια???


Κατι αναμεσα στον κωδικα που σου εδωσα και σε αυτο το topichttp://www.ms-office.gr/forum/excel-...html#post11458

Τελευταία επεξεργασία από το χρήστη sotisanis : 16-10-13 στις 21:06.
Απάντηση με παράθεση