Excel : Macro / Partage

Bonjour,

J'ai besoin de votre aide, voilà :

j'ai créé un fichier de maintenance où plusieurs utilisateurs en réseaux ont accès à ce document excel. Un bouton appel une userform qui permets de rentrer quelques données qui seront ensuite copier sur la feuille excel.

Seulement voilà, lorsque le fichier n'est pas partagé : tout fonctionne correctement; Une fois que celui-ci est partagé : rien ne va plus et la fameuse erreur 1004 qui s'inscrit. J'ai essayé de déprotégé la feuille et de la reproteger ensuite mais cela ne fonctionne pas.

voici le code :

Public Sub Userform_Activate()

datebox = Date
nbinterv = Range("f2") + 1

nombox = ""
desbox = ""
servbox = ""
carbox = ""

carbox.RowSource = "index!a3: a10 "
servbox.RowSource = "index!c3: c26"

End Sub

Public Sub Val_Click()

Range("b6").Select

If ActiveCell = 1 Then
ActiveCell.Select
Else:
Rows(5 + Range("f2")).Select 'selectionne la ligne de la cellule active
ActiveCell.Offset(1, 0).Select 'selectionne la cellule ce trouvant 2 lignes plus bas
Selection.Copy 'copie ces 2 lignes
Selection.Insert Shift:=xlDown 'insert les cellules copiées
ActiveCell.Offset(-1, 0).Activate 'reselectionne la cellule 2 cases au dessus
ActiveCell.Value = Cells(2, 6).Value + 1 'place un numero dans cette cellule
End If

'inscription des données dans la dernière ligne
ActiveCell.Offset(0, 1).Value = desbox
ActiveCell.Offset(0, 2).Value = nombox
ActiveCell.Offset(0, 3).Value = servbox
ActiveCell.Offset(0, 4).Value = datebox
ActiveCell.Offset(0, 5).Value = carbox

Intervention.Hide

End Sub

Merci d'avance pour votre aide, j'en ai vraiment besoin !!!
Configuration: Windows 2000
Internet Explorer 6.0

2 réponses

  1. re,

    le fichier permets un archivage par mois donc à l'ouverture du document la feuille correspondante au mois du jour est selectionné, sur cette feuille le bouton pour appeler la macro s'y trouve !!!
    comment celà se fait-il alors que lorsque le fichier n'est pas partagé ça fonctionne ???

    galérienne !!!
    1. Contributeur
      Bonjour,
      Etant donner que tu appel 'd'ailleur' il faut préciser la feuille que tu veux rendre active et éventuellement le classeur (si plusieur).

      sheets("NomFeuille").select

      A+